NAVAL  POSTGRADUATE  SCHOOL 
Monterey,  California 


THESIS 


Design  and  Implementation  of 
a  Multimedia  DBMS 
:  Retrieval  Management 

by 

Pongsuwan,  Wuttipong 
September,  1990 

Thesis  Advisor:  Vincent  Y.  Lum 


Approved  for  public  release;  distribution  is  unlimited. 


91-12243 


Security  Classification  of  this  pace 


la  Report  Security  Classification 
Unclassified 


2a  Security  Classification  Authority 


REPORT  DOCUMENTATION  PAGE 


1  b  Restrictive  Markings 


2  b  Declassification/Downgrading  Schedule 


4  Performing  Organization  Report  Number(s) 


6b  Office  Symbol 
(If  Applicable)  52 


6a  Name  of  Performing  Organization 
Naval  Postgraduate  School 


6c  Address  (city,  state,  and  l JP  codr I 

Montcrcv,  CA  93943-5000 


8a  Name  of  Funding/Sponsonng  Organization  8b  Office  Symbol 

(If  Applicable) 


8c  Address  (city,  slate,  and  ZIP  code ) 


3  Distribution  Availability  of  Report 
Approved  for  public  release; 
distribution  is  unlimited. 


5  Monitoring  Organization  Report  Number(s) 


7a  Name  of  Monitoring  Organization 
Naval  Posteraduate  School 


1  b  Address  (city,  state,  and  ZIP  code) 
Monterev,  CA  93943-5000 


9  Procurement  Instrument  Identification  Number 


10  Source  of  Funding  Numbers 


Program  Eiemeni  Number  I  Project  No  I  Tajik  No  I  Work  Uml  Access. or.  No 


1  5  Pace  Count 


1  1  Title  (Include  Security  Classification) 

Desien  and  Implementation  of  a  Multimedia  DBMS:  Retrieval  Manacement  (Unclassified) 


1  2  Personal  Aulhor(s) 

Ponesuwan,  Wutlipone 


13a  Type  of  Report  13b  Time  Covered  14  Date  of  Report  (year,  month.day) 

Master's  Thesis  From  August  89  To  September  90  September  1990 


1 6  Supplementary  Notation  The  views  expressed  in  this  thes’s  are  those  of  the  author  and  do  not  reflect  the  official  policy  or  position 
of  the  Department  of  Defense  or  the  U.S.  Government. 


17  Cosati  Codes  _  1  8  Subject  Terms  (continue  on  reverse  if  necessary  and  identify  by  block  number) 

Field  |  Group  |  Subgroup  Multimedia  Database  Management  System,  Multimedia, 

DBMS,  MDBMS,  Image  Database. 


19.  ABSTRACT  (Continue  on  reverse  if  necessary  and  identify  by  block  number) 

Current  conventional  Database  Management  Systems  (DBMS)  manage  only  alphanumeric  data.  However,  data  to  be  stored  in  the 
future  is  expected  to  include  some  multimedia  form,  such  as  images,  graphics,  sounds  or  signals.  The  structure  and  the  semantics  of 
the  media  data  and  the  operations  on  that  data  are  complex.  It  is  not  clear  what  requirements  are  needed  in  a  DBMS  to  manage  this 
kind  of  data.  It  is  also  not  clear  what  is  needed  in  the  data  model  to  support  this  kind  of  data;  nor  what  the  user  interface  should  be  for 
such  a  system.  The  goal  of  the  Multimedia  Database  Management  System  project  in  the  computer  science  department  of  the  Naval 
Post  Graduate  School  is  to  build  into  a  Database  Management  System  (DBMS)  the  capability  to  manage  multimedia  data,  as  well  as 
the  formatted  data,  and  define  operations  on  multimedia  data.  This  thesis,  focusing  only  on  the  media  data  of  image  and  sound,  first 
describes  the  operations  of  such  a  system,  then  discusses  the  general  design  of  it,  and  finally  outline  the  detailed  design  and 


21  Abstract  Security  Classification 
Unclassified 


implementation  of  the  retrieval  operation. 


20  Distribution/Availability  of  Abstract 

|  X |  unclassified/unlimitcd  [^j  same  as  report  \^\  DTIC  users 


22a  Name  of  Responsible  Indis  ideal  22b  Telephone  (Include  Area  code/  22c  Office  Symbol 

Vincent  Y.  Lum  (4081646-2693  52Lu 


DD  FORM  1473,  84  MAR  83  APR  edition  may  be  used  until  exhausted  security  classification  of  this  page 

All  other  editions  are  obsolete  Unclassified 


1 


Approved  for  public  release;  distribution  is  unlimited. 


DESIGN  AND  IMPLEMENTATION  OF  A  MULTIMEDIA  DBMS: 
RETRIEVAL  MANAGEMENT 

by 

Wuttipcng  Pongsuwan 
Lieutenant,  Royal  Thai  Navy 
B.S.,  Royal  Thai  Naval  Academy,  1985 


Submitted  in  partial  fulfillment  of  the 
requirements  for  the  degree  of 


MASTER  OF  SCIENCE  IN  COMPUTER  SCIENCE 

from  the 

NAVAL  POSTGRADUATE  SCHOOL 

September  1990 


Author: 


'  // 


P. 

’  cp/  - 


ii 


ABSTRACT 


Current  conventional  Database  Management  Systems  (DBMS)  manage  only 
alphanumeric  data.  However,  data  to  be  stored  in  the  future  is  expected  to  include  some 
multimedia  form,  such  as  images,  graphics,  sounds  or  signals.  The  structure  and  the 
semantics  of  the  media  data  and  the  operations  on  that  data  are  complex.  It  is  not  clear  what 
requirements  are  needed  in  a  DBMS  to  manage  this  kind  of  data.  It  is  also  not  clear  what  is 
needed  in  the  data  model  to  support  this  kind  of  data;  nor  what  the  user  interface  should  be 
for  such  a  system.  The  goal  of  the  Multimedia  Database  Management  System  project  in  the 
computer  science  department  of  the  Naval  Post  Graduate  School  is  to  build  into  a  Database 
Management  System  (DBMS)  the  capability  to  manage  multimedia  data,  as  well  as  the 
formatted  data,  and  define  operations  on  multimedia  data.  This  thesis,  focusing  only  on  the 
media  data  of  image  and  sound,  first  describes  the  operations  of  such  a  system,  then 
discusses  the  general  design  of  it,  and  finally  outline  the  detailed  design  and  implementation 
of  the  retrieval  operation. 
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I.  INTRODUCTION 


A.  BACKGROUND 

Current  conventional  Database  Management  Systems  (DBMS)  manage  only  formatted 
data  (eg.  alphanumeric  data).  Multimedia  data  such  as  image,  sound,  graphics  and  signals, 
are  generally  ignored.  Many  DBMS  applications  routinely  need  multimedia  data  or  media 
data  (these  two  terms  will  be  used  interchangeably  in  this  thesis)  as  well  as  formatted  data. 
Current  technology  allows  us  to  keep  these  different  types  of  media  data  in  separate  files. 
That  is,  a  single  image  or  a  single  signal,  which  we  call  a  "media  object”  in  this  thesis,  is  an 
instance  of  media  data  and  will  occupy  one  distinct  file.  Although  the  term  object  is  used,  it 
is  obvious  that  a  media  object  is  merely  a  single  value  of  an  instance,  as  in  a  normal 
database  in  which  an  instance  of  the  value  of  the  age  attribute  is  35.  In  multimedia  data  an 
image  is  an  object  but  is  also  the  value  of  the  attribute  picture.  It  does  not  require  much 
imagination  to  see  that  under  the  circumstances,  a  user  would  soon  lose  track  of  the 
"objects",  even  for  a  very  small  application. 

Handling  data  means  allowing  the  storage  and  searching  by  the  content  of  the  data  we 
process.  Immediately,  one  would  then  ask  the  question  of  how  to  handle  content  search  in 
multimedia  data.  There  is  no  question  that  this  is  a  difficult  problem.  One  must  find  w'ays 
to  handle  a  very  large  amount  of  multimedia  data,  with  the  capability  to  search  and  find  the 
appropriate  data  conveniently  and  efficiently  based  on  its  contents. 

A  similar  problem,  though  in  much  simpler  form,  was  encountered  earlier  when 
dealing  with  the  more  "standard"  types  of  alphanumeric  data.  Database  management 
systems  DBMS  were  developed  as  a  result  of  users  trying  to  solve  the  problem.  The 
power  of  a  DBMS  is  well  recognized  today  and  there  is  no  need  for  us  to  discuss  these 
systems  here.  What  one  wishes  to  develop  is  a  technology  that  would  allow  us  handle 
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multimedia  data  as  conveniently  as  we  can  process  the  standard  data.  The  Multimedia 
Database  System  Project  (MDBMS)  in  the  Computer  Science  Department  of  the  Naval  Post 
Graduate  School  was  formed  for  this  purpose  [WK87,  LM88]. 

The  need  to  support  multimedia  data  processing  is  actually  a  natural  extension  of  the 
use  of  the  computer  to  process  standard  data.  Applications  generally  need  not  only 
formatted  data,  but  also  the  "unformatted"  data  or  media  data.  Unformatted  data,  including 
image,  video,  sound  and  signal  are  usually  stored  as  multimedia  objects.  For  example,  in  a 
person  database,  one  would  store  the  various  data  such  as  an  birthday,  an  address,  a  job 
title,  about  an  individual.  In  many  applications  one  would  most  likely  want  to  store  and 
process  the  photo  of  the  individual  as  well,  if  the  technology  allows  this  to  be  done  easily. 
In  military  applications,  we  need  access  to  both  formatted  data  and  unformatted  data  in 
order  to  make  decisions  on  many  operations.  In  the  past  we  processed  these  operations 
manually,  ana  it  required  much  effort  to  get  through  the  formatted  and  unformatted  data  for 
pertinent  information.  Currc  uiv,  and  even  more  so  in  the  future,  computers  are  used  to 
assist  the  users.  Todas  sn  ac:  and  processing  media  data  in  routine  applications  are  still 
not  so  simple,  although  are  very  dose  from  the  technology's  standpoint. 

Aside  from  the  MDBMS  project  here,  a  number  of  projects  have  been  established  to 
do  research  in  multimedia  data  processing.  Among  these  include  the  following:  the 
MINOS  project  at  the  University  of  Waterloo  [Ch86],  which  is  aimed  at  the  management  of 
documents  containing  multimedia  data;  the  ORION  system  at  MCC  in  Austin,  that  contains 
a  Multimedia  Information  Manager  (MIM)  [WK87]  for  processing  multimedia  data;  the 
IBM  Tokyo  Research  Laboratory  "mixed  object  database  systems,"  MODES  1  and 
MODES2  [KKS87J;  and  an  ESPRIT  project  in  Europe  designing  a  multimedia  Filing 
system  called  MULTOS  [Be85,Be86,  BRG88].  A  discussion  of  these  projects  is 
presented  in  [LM88]  and  [MLW89]  and  will  not  be  repeated  here.  Today,  MDBMS 
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research  and  development  is  still  in  the  infancy  stage.  Even  the  definition  of  the 
functionality  of  a  multimedia  database  management  system  (MDBMS)  is  still  an  open  issue. 

Recently  the  management  of  the  multimedia  data  on  the  personal  computer  has  grown 
rapidly.  The  hypertext  and  hypermedia  data  management  in  the  Macintosh  computer  with  a 
hypercard  application  has  many  users  including  the  ARGOS  project  [WNTA89]  being 
developed  at  Naval  Post  Graduate  School.  Hypertext  uses  the  idea  of  card  stacks  in  which 
each  card  in  a  stack  contains  many  objects  called  buttons  and  fields  corresponding  to 
functions  that  can  be  invoked  for  processing  by  clicking  the  mouse  set  to  that  icon  on  the 
screen.  A  problem  of  using  hypertext  and  hypermedia  is  that  users  cannot  query  the  data  as 
done  in  the  conventional  database  systems.  Users  can  easily  get  lost  during  the  search 
process.  Another  problem  is  that  hypertext  uses  the  hierarchical  database  approach  and  its 
users  have  to  go  down  the  branches  of  the  tree  to  get  to  the  card  needed.  Additionally, 
hypertext  uses  an  interpreter  to  process  user  commands.  Both  of  these  approaches  are 
time-consuming.  Further,  although  hypertext  and  hypermedia  data  management  give  the 
users  much  more  power  to  process  their  data,  it  only  works  on  the  microcomputers  in  the 
single  user  environment.  Data  cannot  be  shared  as  in  the  normal  central  or  distributed 
database  systems.  To  avoid  the  above  restrictions  and  shortcomings,  a  standard  DBMS 
with  the  extended  capability  to  process  the  media  data  was  introduced  [MLW89].  As 
discussed  in  Chapter  II,  this  multimedia  database  manage  system  (MDBMS)  consists  of 
subsystems  to  manage  conventional  databases  and  advanced  databases  supporting  media 
object  management,  and  the  integration  layer  that  provides  a  uniform  interface  to  access 
alphanumeric  data,  media  data,  or  mixture  of  both. 

B.  SAMPLE  APPLICATIONS 

In  the  last  section  we  discussed  the  background  related  to  multimedia  data  processing. 
In  this  section  we  shall  discuss  in  substantial  detail  the  scenarios  of  some  applications.  The 


3 


purpose  is  to  give  the  readers  a  better  understanding  in  the  design  and  operation  of  our 
system  for  multimedia  data  processing. 

Suppose,  for  example,  in  response  to  an  occasion  the  chief  of  staff  of  the  Navy  wants 
to  assign  ships  to  an  operation,  and  release  information  to  the  news  media.  To  accomplish 
his  job,  he  might  need  not  only  the  formatted  data  which  can  be  supported  by  the 
conventional  database  but  also  the  unformatted  (image,  sound  or  signal)  data  in  the 
database  as  well. 

He  might  want  to  know  which  ships  can  be  sent  to  that  geographical  area.  In  order  to 
find  which  ships  can  get  to  that  area,  he  would  need  to  know  the  location  of  the  ships,  the 
travel  time  for  the  ships  to  get  to  the  operation  location,  the  firing  power  of  the  ship,  and 
the  personnel  of  the  ships,  such  as  the  key  officers.  This  kind  of  operation,  however,  only 
needs  the  fuimatted  data. 

Sometimes  this  person  might  want  to  see,  in  addition  to  the  formatted  data,  the 
images  of  the  ships  and  the  pictures  of  the  officers.  For  example  he  might  want  to  release 
some  pictures  of  cenain  ships  and  their  officers  to  the  news  media.  This  kind  of  operation 
requires  both  formatted  and  multimedia  data  from  the  database. 

In  another  occasion,  the  chief  might  want  to  release  to  the  news  media  some  photos  in 
the  Navy's  collection  that  show  the  heroic  efforts  of  the  navy  personnel,  and  their  ships, 
rescuing  civilians  in  a  disaster  at  sea.  The  specific  photos  suitable  for  such  an  illustration 
are  not  known  but  all  appropriate  photos  would  be  scanned  to  search  for  the  desired  ones. 
Such  kind  of  search  can  only  happen  if  the  contents  of  the  photos,  a  specific  kind  of  media 
data,  could  be  searched.  Naturally  one  might  also  want  other  formatted  data  like  date  and 
place  and  time  the  photo  have  been  taken,  etc.  to  go  with  the  media  data. 
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In  short  it  is  safe  to  assume  that  both  formatted  data  and  media  data  may  be  needed  in 
certain  applications.  Moreover,  sometimes,  not  only  we  need  to  store  and  retrieve  media 
data  but  also  to  search  this  kind  of  data  based  on  their  contents. 

C.  THE  SCOPE  OF  THE  THESIS 

The  general  design  of  the  overall  application  for  multimedia  database  management 
system  includes  the  design  of  the  high  level  operations  like  table  creation  and  data  insertion, 
retrieval,  update,  and  deletion,  composing  the  main  functions  of  any  DBMS.  Three 
students  doing  related  work  on  their  MS  theses  in  the  Computer  Science  Department  of  the 
Naval  Post  Graduate  School  are  involved.  The  detail  design  and  implementation  for  the 
creation  of  table  and  the  insertion  of  tuples  are  given  in  the  thesis  by  Pei  [PE90],  The 
storage  and  management  of  sound  data  using  an  IBM  compatible  computer  connected  to  the 
main  database  system  is  given  in  the  thesis  by  Atila  [AT90].  This  thesis  currently  being 
read,  will  focus  on  the  design  and  implementation  of  the  retrieval  operation.  The  design  of 
the  new  system  catalog  for  the  new  data  type  of  the  media  of  image  and  sound  for  retrieval 
as  well  as  the  other  functions  will  be  given.  This  thesis  will  show  that,  in  order  to  retrieve 
the  data,  we  have  to  first  build  temporary  database  tables  for  further  processing. 

Chapter  II  in  this  thesis  will  discuss  the  previous  works  in  the  Multimedia  Database 
System  Project  including  the  architecture  of  the  MDBMS  system.  Chapter  III  section  A 
will  discuss  the  environment  in  which  the  MDBMS  is  to  be  built.  In  section  B  of  chapter 
III,  the  design  of  the  MDBMS  catalog  will  be  described.  In  section  C  of  the  same  chapter 
an  overview  of  the  database  operations  will  be  presented  and  in  section  D  a  detail 
description  of  the  design  of  the  retrieval  operation  will  be  given.  Chapter  IV  concentrates 
on  the  implementation  aspect  of  the  retrieval  operation.  In  section  A  of  chapter  IV,  the 
interface  design  for  the  retrieval  operation  will  be  described;  in  section  B  of  this  chapter 
query  processing  for  retrieval  will  be  given;  in  section  C  of  the  same  chapter  the  data 
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structures  for  the  retrieval  operation  will  be  described;  in  section  D  the  program  structures 
for  the  retrieval  operation  will  be  presented;  and  in  section  E,  a  method  to  link  and  run  the 
MDBMS  will  be  given.  Chapter  V  will  present  the  conclusions  and  summary. 


II.  SURVEY  OF  PREVIOUS  WORK 


The  work  in  the  Multimedia  Database  System  Project  at  the  Computer  Science 
Department  of  the  Naval  Post  Graduate  School  began  in  1988  [LM88,  MLW89].  The  first 
work  was  to  design  the  architecture  of  the  MDBMS  to  process  multimedia  data  as 
conveniently  as  the  processing  of  the  standard  data  (formatted  data).  The  gross  architecture 
was  composed  of  three  parts.  The  first  part  is  the  MDBMS  interface  which  is  the  interface 
between  the  users  and  the  formatted  data  and  media  data.  The  second  part  is  the  standard 
DBMS  which  manages  all  the  formatted  data.  The  third  is  the  Media  Manager  for  media 
data.  One  may  consider  that  the  Media  Manager  to  be  composed  of  different  subsystems 
which  currendy  includes  the  Image  Manager  and  the  Sound  Manager  since  only  image  and 
sound  are  supported.  The  detail  discussion  is  in  [LM88].  The  architecture  is  as  shown  in 
Figure  1. 


Figure  1.  The  architecture  of  the  MDBMS 
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Conventional  DBMS  systems  do  not  support  multimedia  data.  To  support 
multimedia  data  we  must  fit  it  into  a  data  model.  It  has  been  determined  that  the  abstract 
data  type  (ADT)  concept  is  most  appropriate  for  the  task  [LM88]. 

In  the  work  of  [LM88],  it  was  proposed  that  media  data  types  like  image,  sound, 
graphics,  text  or  signal  be  defined  and  their  operations  constructed.  When  a  media  data 
type  is  encountered,  the  system  will  be  able  to  support  it  through  this  new  structure.  For 
example,  suppose  the  image  data  type  is  set  up  and  can  be  used  as  an  attribute  domain.  A 
relation  PERSON  (name,  age,  photo)  can  be  defined  where  name  and  age  are  the  normal 
data  types  (e.g.  character  and  integer),  and  photo  is  of  image  type.  The  operations  on  such 
a  data  type,  image,  is  given  in  [LM88]. 

Operationally,  as  stated  in  the  previous  chapter,  the  processing  of  media  data  type 
sometimes  requires  the  recognition  of  the  contents  of  the  media  data.  Since  automatic 
recognition  of  media  contents  by  the  computer  is  beyond  the  state  of  an,  a  proposal  to 
supplement  the  raw  media  data  with  the  descriptions  in  natural  language  form  has  been 
suggested. 

Further,  multimedia  data  are  always  accompanied  by  some  standard  formatted  data 
called  registration  data.  For  images  it  could  be  resolution,  pixel  depth,  source,  date  of 
capture,  and  colormap.  The  important  issue  of  the  registration  data  is  that  they  are  required 
if  anything  is  to  be  done  with  the  multimedia  data  at  all,  either  to  interpret  them  for  replay  or 
display,  or  to  identify  them  and  distinguish  them  from  others.  Registration  data  can  easily 
be  stored  in  the  attributes  and  tuples  of  standard  relational  database  systems,  thus  making 
the  full  power  of  query  languages  available  to  retrieve  and  manipulate  them. 

While  registration  data  is  indispensable,  the  description  data,  either  formatted  or 
unformatted  for  describing  the  contents  of  multimedia  data  generally  are  not.  This 
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description  data  is  redundant,  because  it  generally  repeats  information  already  present  in  the 
image,  text,  or  sound.  However,  because  of  the  complexity  and  the  depth  of  its 
information  content,  there  is  hardly  any  chance  to  perform  efficiently  a  contents-oriented 
search  on  the  media  raw  data  themselves.  Such  kind  of  work  requires  much  too  much 
intelligence  in  a  system  than  we  know  how  to  provide  tv.day.  Thus,  it  is  much  easier  and 
more  effective  to  let  a  human  user  provide  the  description,  just  as  an  author  provides 
abstract  and  keywords  with  an  article.  In  either  case  the  database  should  hold  the  result  of 
the  extraction,  i.e.  the  description,  and  link  it  to  the  multimedia  data.  Thus,  we  have  each 
instance  of  a  multimedia  data  represented  in  three  parts:  registration  data,  raw  data  and 
description  data  as  shown  in  Figure  2  [MLW88], 

Multimedia  data,  their  registrations  and  their  descriptions  can  be  used  in  various 
ways.  Any  access  to  the  raw  data  must  go  "through"  the  registration  data  to  make  sure  that 
the  raw  data  are  interpreted  correctly.  Editing  operations  on  the  raw  data  including 
filtering,  clipping,  bitmap  operations  for  images,  stripping  of  layout  commands  and  control 
characters  for  text,  etc.  are  permitted.  Special  operators  that  are  applied  to  the  media  data 
can  be  distance  and  volume  calculations  on  geometric  data,  or  the  addition  of  synonyms  in 
the  case  of  keywords.  Sometimes,  these  operators  can  actually  do  a  lot  of  processing 
without  ever  touching  the  raw  data.  Most  of  these  operators  cannot  be  implemented  with 
only  the  commands  of  the  query  language.  They  need  the  features  of  a  general-purpose 
programming  language.  New  data  models  must  allow  them  to  be  incorporated  into  the 
database  as  "procedure"  or  "method". 

The  media  data  type,  which  was  previous  defined  in  [MLW88]  is  IMAGE  datatype. 
IMAGE  is  regarded  as  an  abstract  data  type  with  its  own  set  of  operators  or  functions.  By 
this  design  the  IMAGE  composed  of  three  parts  namely  raw  data  (consist  of  a  matrix  of 
pixels),  registration  data  (size  of  the  image,  resolution,  encoding,  colormap),  and 
description  data  (description  of  the  image).  The  operations  of  the  relational  database  cannot 
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be  performed  directly  on  the  data  type  IMAGE.  They  treat  an  IMAGE  value  as  a  whole, 
i.e.  projection  either  drops  it  completely  or  keeps  it  in  the  result.  The  comparisons  needed 
in  selections  and  joins  cannot  be  performed  on  the  whole  image.  A  detail  discussion  is  in 
[MLW88]. 


IMAGE 


Registration  data 


(  Height,  width,  depth,  colormap  ) 


Description  data 

^  Big  nose,  big  ears 


Figure  2  -  Conceptual  View  of  an  Instance  or  Value  of  the  Abstract  Data 
Type  IMAGE 

The  subcomponent  Image  Manager  of  the  Media  Manager,  as  shown  in  Figure  1,  was 
implemented  by  Thomas  [Th88].  Thomas  provided  the  lower  level  applications  for 
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processing  image  database  which  have  the  ability  to  search  and  store  images  in  the  DBMS. 
She  provided  the  internal  functions  to  process  the  image  data  as  well.  Thomas  used  a 
relational  database  that  incorporated  the  IMAGE  data  type.  This  IMAGE  data  type  can  be 
modified  to  accommodate  changes  in  the  database  environment  with  no  modification  from 
the  user  side  of  the  database  interface. 

The  subcomponent  Sound  Manager  of  the  Media  Manager  as  shown  in  Figure  1  was 
implemented  by  Sawyer  [Sa88].  Sawyer  provided  a  similar  processing  capability  for  the 
incorporation  of  sound  data  as  done  by  Thomas  to  handle  image  data.  At  that  time,  SUN  3 
Workstation  did  not  provide  support  for  sound  data  so  an  IBM-compatible  PC  was  used 
for  sound  processing. 

The  content-description  search  for  the  media  data  was  first  implemented  by  Meyer- 
Wegener  [LM90]  by  using  a  parser  to  parse  the  natural  language  descriptions  and  get  the 
result  in  a  form  acceptable  by  Prolog.  To  parse  natural  language  descriptions,  one  needs  a 
dictionary  to  define  the  vocabulary.  A  dictionary  had  been  built  for  this  purpose.  A  detail 
description  of  the  parser  is  given  in  Dulle  [Du90]. 

The  MDBMS  prototype  previously  implemented  was  named  DEMOS  1.  DEMOS  1 
was  designed  for  managing  only  the  image  data  types.  DEMOS  1  contains  2  parts:  one  is 
the  Prolog  portion  for  providing  support  for  the  natural  language  search;  the  second  is  an 
INGRES  DBMS.  The  INGRES  DBMS  portion  handles  only  media  IMAGE  relations. 
This  prototype  does  not  have  an  interface  processing  both  formatted  and  media  data.  It  can 
retrieve  images  via  the  identifiers  of  the  images  or  their  natural  language  descriptions. 

The  current  prototype  is  an  attempt  to  broaden  the  database  handling  capability  by 
providing  the  integrated  support  of  both  formatted  and  media  data.  Its  design  and 
implementation,  as  described  in  chapter  3  and  chapter  4  of  this  thesis,  is  based  on  the  same 
architecture  of  the  previous  work.  The  new  system  will  provide  the  high  level  operations 
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of  table  creation  and  data  insertion,  retrieval,  deletion,  and  update  for  both  formatted  and 
media  data. 


12 


III.  DESIGN  OF  THE  SYSTEM 


A.  SYSTEM  ENVIRONMENT 

As  mentioned  in  the  previous  chapter,  the  prototyping  effort  for  building  this 
multimedia  database  system  (MDBMS)  began  about  two  years  ago  [Th88,  Sa88,  MLW89]. 
For  various  reasons,  INGRES  was  chosen  to  be  the  DBMS  to  manage  the  fonnatted  data 
and  the  SUN  workstations  and  servers  with  the  UNIX  operating  system  were  chosen  to  be 
the  system  in  which  the  multimedia  database  management  system  (MDBMS)  was  to  be 
constructed.  Because  the  SUN  workstations  in  1988  did  not  support  sound,  an  IBM 
wwiipaubic  PC  used  to  store  sound  data. 

A  number  of  restrictions  are  the  consequence  of  using  the  INGRES  DBMS.  First, 
the  INGRES  version  in  which  the  original  MDBMS  prototype  was  constructed  does  not 
support  user-defined  abstract  data  types.  Second,  INGRES  allows  a  maximum  of  500 
characters  to  be  stored  for  a  given  attribute.  Third,  it  does  not  allow  its  users  to  get  the 
catalog  information  readily.  Fourth,  an  intermediate  interface  below  the  language  of  SQL  is 
not  available  for  the  INGRES  users.  That  is,  although  SQL  is  supported  on  INGRES, 
SQL  is  compiled  directly  into  INGRES  low  level  code  for  execution.  Each  of  the  above 
restrictions  affected  the  design  and  implementation  of  our  MDBMS. 

Although  more  recent  versions  of  INGRES  have  removed  some  of  the  restrictions, 
significant  recoding  effort  is  required  to  make  use  of  the  new  versions.  As  the  prototype 
construction  at  this  time  is  not  intended  to  be  a  production  system,  but  only  as  a 
demonstration  of  the  various  concepts,  a  decision  was  made  not  to  recode.  Similar 
situation  occurs  in  the  SUN  workstations.  New  SUN  workstations  now  support  sound. 
But  that  would  require  substantial  mvesunent  to  purchase  new  hardware  and  recode  some 
programs.  It  was  decided  that,  instead  of  these  investments,  which  would  produce  little 
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gain,  the  PC  system  would  be  retained  to  manage  sound  data  and  would  be  integrated  into 
the  MDBMS  prototype  as  a  backend  server  for  sound  by  connecting  it  to  the  SUN  system 
via  a  local  area  network,  which  in  this  case  is  the  Ethernet. 

The  environment  just  discussed  influences  the  design  and  implementation  of  the 
system  and  will  be  reflected  in  the  various  parts  in  this  thesis  as  well  as  the  theses  by  Pei 
[PE90]  and  Atila  [AT90]. 

B.  CATALOG  DESIGN 

Because  the  INGRES  catalog  management  cannot  accommodate  the  needs  of  the 
MDBMS,  it  becomes  necessary  to  design  and  manage  the  MDBMS  catalog  ourselves. 
While  it  seemed  advantageous  in  the  beginning  to  use  INGRES  to  manage  our  catalog 
tables,  further  investigation  revealed  that  such  an  approach  only  complicates  the  MDBMS 
operations  and  produces  no  benefits.  This  occurs  because  INGRES  does  not  know  what 
MDBMS  wants  to  do  with  the  catalog  information.  With  or  without  INGRES,  MDBMS 
must  manage  its  catalog  as  tables  outside  the  INGRES  system[PE90].  Using  INGRES  to 
manage  the  MDBMS  catalog  tables  therefore  would  mean  the  addition  of  a  layer  and 
operations  unnecessarily.  The  decision  was  made  to  create  the  catalog  in  the  form  of 
system  tables  in  the  internal  memory  throughout  the  operation  of  MDBMS.  When  a  user 
signs  off,  the  updated  system  tables  are  written  out  as  files.  When  the  user  restarts  the 
MDBMS,  the  files  are  read  into  memory  again  before  any  user  operation  is  performed. 

In  our  design,  we  have  four  tables  or  arrays  to  be  used  for  storing  our  catalog 
information.  The  first  is  TableJList  array  which  will  contain  the  integer  number  that  points 
to  the  entries  in  Table_Array.  The  reason  why  we  have  such  a  structure  and  the  detailed 
use  of  this  structure  will  not  be  given  here  but  is  given  in  [PE90].  Basically  it  is  done  for 
database  maintenance  purposes.  The  second  table  is  Table_Array  which  is  composed  of 
table_name,  table_key,  att_count  and  att_entry:  table_key  denotes  the  number  that  will  be 
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assigned  to  the  media  relation  in  the  create  table,  att_count  denotes  the  number  of  attributes 
in  the  table,  and  att_entry  shows  the  starting  point  of  the  table  in  the  att_array.  The  third 
table  is  the  Media_Array  table  which  keeps  track  of  the  media  data  that  exist  in  our 
database.  The  fourth  table  is  the  Att_Array  table  which  contains  att_name,  data_type 
next_index  and  value_entry.  Att_name  is  the  name  of  the  attributes  for  any  table;  data_type 
is  the  data  type  for  each  attribute  including  formatted  and  media  data  type;  next_index  is  the 
pointer  to  the  next  attribute  in  the  sequence  of  attribute  entries  for  a  given  table;  and 
value_entry  is  the  pointer  to  the  array  Value_Array,  that  has  the  attribute  value  for  that 
attribute  entry  in  the  Att_Array.  Actually,  the  Value_Array  table  has  four  arrays 
representing  four  data  types  which  correspond  to  the  value_entry  in  Att_Array.  The  four 
arrays  are  char,  integer,  real,  and  media  data  (image  and  sound)  and  these  represent  all  the 
data  types  that  the  MDBMS  supports.  The  Value_Array  tables  are  used  to  store  data  before 
the  data  is  input  to  the  database  and  also  before  it  is  displayed  for  the  user.  The  structures 
of  the  catalog  tables  discussed  above  are  shown  in  Figure  3  through  Figure  5.  The 
structure  of  the  Value_Array  discussed  above  is  shown  in  Figure  6. 


TabIe_List :  TabIe_Array  : 


table_name 

table_key 

att_count 

att_entry 

EMPLOYEE 

1 

6 

1 

DEPT 

2 

4 

7 

Figure  3  Tab!e_List  and  Tab!e_Array  tables  for  the  catalog 
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Figure  4  MediaArray  table  for  the  catalog 


AttArrav  : 


att_name 

data_type 

next_index 

value_entry 

fname 

c20 

2 

lname 

c20 

3 

salary 

float 

4 

dnum 

integer 

5 

>to 

image 

6 

\  oice 

sound 

-1 

dno 

integer 

8 

dname 

c20 

9 

dloc 

c20 

10 

dphoto 

image 

-1 

Figure  5  Att  Array  table  for  the  catalog 
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F  value 


C  value 


(int)  (int)  (int) 

Figure  6  Value  Array  tables 


(float) 


(char) 


Let  us  illustrate  the  use  of  the  catalog  tables  by  means  of  an  example.  A  user  creates 
two  relations  named  EMPLOYEE  and  DEPT.  The  EMPLOYEE  relation  has  six  attributes 
which  are  fname  (c20),  lname  (c20),  salary  (float),  dnum  (integer),  photo  (image),  voice 
(sound).  The  DEPT  relation  has  four  attributes  which  are  dno  (integer),  dname  (c20),  dloc 
(c20),  dphoto  (image).  First,  when  a  relation  is  to  be  created,  the  catalog  management  part 
of  the  MDBMS  will  search  through  the  list  of  relations,  checking  if  a  duplication  exists  for 
the  new'  relation  name  with  the  previous  relation  names  in  Table_Array.  If  a  duplication  is 
found,  the  user  has  to  reenter  a  different,  new  name.  If  no  duplication  exist,  the  system 
will  put  the  new  relation  into  the  next  slot  of  Table_Array  and  assign  the  value  to  the 
Table_List  corresponding  to  that  position.  For  example,  a  user  enters  a  new  relation  name 
DEPT  into  the  system.  The  system  will  check  for  duplication  of  relation  names  and  if  no 
duplicates  exists,  the  system  will  insert  DEPT  into  Table_Array  at  the  next  slot  which  is 
row  2.  In  the  next  step  the  system  will  insert  the  index  number  2  into  next  slot  of 
Table_List  (as  shown  in  Figure  3).  The  next  step  is  to  enter  the  First  attribute  name  of  the 
relation  and  its  data  type.  This  information  is  entered  into  the  next  slot  in  the  Att_Array 
table.  The  position  (or  the  row  number)  in  Att_Array  is  then  inserted  into  the  Table_Array 
table  in  the  field  att_entry  for  the  corresponding  relation.  For  example,  a  user  enters  dno 
which  is  the  First  attribute  for  the  relation  DEPT  The  system  will  search  for  the  next 
available  slot  in  table  Att_Array,  index  7  is  the  First  available  slot.  The  system  then  inserts 
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dno  and  its  data  type  (e.g.  integer  in  this  case)  into  the  Att_Array  table  and  puts  the  index 
(e.g.  7)  for  that  attribute  in  Att_Array  (e.g.  dno)  into  the  att_entry  column  for  relation 
DEPT  (as  shown  in  Figure  3  and  Figure  5).  When  the  user  enters  the  next  attribute  in  the 
relation  (e.g.  dname  in  DEPT)  into  Att_Array,  the  coi responding  index  must  be  put  into  the 
next_index  column  of  the  previous  attribute  (e.g.  dno). 

This  goes  on  until  no  more  attribute  is  to  be  inserted  for  the  relation.  Thus  in  our 
example,  the  user  enters  attribute(s)  dname  (c20),  dloc  (c20),  dphoto  (image)  into  the 
relation  DEPT  after  dno.  The  attribute  dname  will  be  assigned  to  the  next  slot  after  dno, 
which  is  row  8,  8  is  the  value  for  next_index  in  the  row  where  dno  is  located.  The  same 
operation  will  occur  for  dloc  and  dphoto.  The  next_index  entry  for  last  attribute  will 
contain  the  end  mark  (-1).  Since  the  dphoto  is  the  last  attribute  for  the  DEPT  relation,  the 
next_index  for  the  attribute  dphoto  therefore  is  -1  as  shown  in  Figure  5.  After  Finishing  the 
creation  of  a  relation  the  user  can  modify  the  relation  by  changing  relation  name,  attribute 
names,  the  data  types  or  deleting  attributes.  This  kind  of  operation  can  be  easily  handled 
by  adjusting  the  entries  in  the  tables  and  the  indexes  of  the  array. 

The  system  catalog  discussed  above  will  be  used  by  all  the  operations  in  the 
MDBMS.  The  use  of  array  index,  compared  to  the  use  of  pointer  linked  list  structure,  is 
judged  to  be  superior;  it  saves  a  lot  of  time  in  searching  the  catalog  tables  and  simplifies  the 
implementation  as  well.  However,  while  attributes  are  required  to  be  unique  within  a  user 
relation,  same  attribute  names  are  permitted  in  different  relations.  While  this  situation 
works  fine  for  formatted  data  because  INGRES  manages  this  kind  of  data  and  confusion 
will  not  arise,  it  creates  problems  for  handling  media  data.  In  the  MDBMS  prototype,  a 
separate  relation,  referred  to  as  media  relation  in  INGRES,  is  created  for  each  media 
attribute.  The  name  of  this  media  relation  is  the  same  as  the  name  of  the  media  attribute. 
For  example,  a  media  relation  is  created  for  dphoto  in  DEPT.  To  avoid  confusion  and  keep 
the  media  relations  distinct  when  the  same  attribute  name  is  used  in  more  than  one  user 
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relations,  the  names  of  these  media  relations  are  appended  by  suffixes  corresponding  to  the 
unique  system  identifiers  assigned  to  the  user  relations.  A  detailed  description  about  this 
will  be  given  in  the  next  section. 

C.  DATABASE  OPERATIONS 

The  operations  of  the  multimedia  database  management  system  on  a  high  level  will  be 
the  same  as  in  a  normal  DBMS  for  formatted  data,  namely,  creation  of  table  and  data 
insertion,  retrieval,  update  and  deletion.  I  shall  discuss  each  one  briefly  and  show  how 
these  operations  are  to  be  accomplished  in  the  MDBMS  prototype. 

The  creation  of  a  relation  in  a  database  requires  the  structure  of  the  relation,  namely 
the  attributes  and  attribute  data  types.  The  relation  name,  the  attribute  names  in  sequence 
and  the  attribute  data  types  (which  can  be  Integer,  Real  orChar)  followed  by  the  length 
information  are  needed.  If  all  the  attributes  are  the  standard  formatted  data  type,  this 
information  and  the  create  table  command  can  be  passed  directly  to  INGRES  via  the  create 
table  command  of  SQL.  Because  the  media  data  type  cannot  be  handled  by  the  INGRES 
system,  we  must  handle  media  data  differently  than  the  formatted  data. 

To  solve  the  above  problem,  we  do  the  following:  When  a  media  data  type  attribute 
is  encountered,  we  enter  into  our  catalog,  specifically  the  Att_Array  table  in  Figure  5,  the 
appropriate  media  data  type.  We  then  request  INGRES  to  create  a  media  relation 
specifically  for  this  media  attribute.  The  structure  of  the  media  relation  depends  on  the  type 
of  the  media,  which  at  this  time  can  only  be  image  and  sound.  Figure  8  shows  the  media 
relation  for  image  data  type  and  Figure  9  shows  the  media  relation  for  the  sound  data  type. 
The  meanings  of  the  attributes  in  media  relation  Photo  (Figure  8)  are  as  follows:  i_id  is  the 
system  assigned  internal  identifier  that  is  used  as  the  value  to  be  entered  in  the  attribute 
Photo  in  the  user  relation  EMPLOYEE,  fjd  is  the  file  name  of  the  image  and  the  exact  path 
where  this  file  exists,  descrp  is  the  natural  language  description  of  the  content  of  the  image 
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file,  and  height,  width  and  depth  are  the  parameters  that  are  needed  to  display  the  image 
file.  Similarly,  for  sound  data  type  as  in  Figure  9,  s_id  and  fjd  play  exactly  the  roles  as  in 
image  data  type,  descrp  is  the  natural  language  description  of  the  content  of  the  sound  file, 
and  freq,  sample  (for  sampling  rate),  res  (for  resolution  of  the  sound)  and  encoding  are 
parameters  that  are  needed  to  reproduce  the  sound  recorded. 

How  to  use  these  relations  to  handle  media  type  can  now  be  explained  easily.  The 
media  data  in  a  user  relation  will  contain  the  appropriate  id's  corresponding  to  the  media  file 
names  as  given  in  the  proper  media  table.  Using  the  file  names,  the  system  can  retrieve  the 
media  files  accordingly.  Thus,  whenever  an  attribute  is  encountered,  the  system  will  first 
check  to  see  if  it  is  a  media  type.  If  not,  nothing  outside  of  INGRES  management  is 
needed.  If  media  data  is  encountered,  the  system  will  separate  the  processing  into  two 
pans:  one  part  consisting  of  the  processing  of  the  formatted  data  to  be  done  by  INGRES 
and  the  other  part  the  processing  of  the  media  data  done  outside  of  INGRES  using  the 
information  in  the  media  relation. 

Relation  name  EMPLOYEE 


fname 

Iname 

■9 

dnum 

warn 

voice 

Figure  7  User  relation  EMPLOYEE 


Relation  name  PHOTO  1 


m 

HHI 

descrp 

| 

width 

Figure  8  media  relation  for  attribute  EMPLOYEE. photo 
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Relation  name  VOICE  1 


H 

descrp 

SB 

B 

res 

encoding 

■ 

m 

Figure  9  media  relation  for  attribute  EMPLOYEE.voice 


Let  us  now  illustrate  by  an  example  what  has  been  just  said.  For  example,  if  we  want 
to  create  the  relation  EMPLOYEE,  which  has  the  following  attributes:  f_name  (c20), 
l_name  (c20),  salary  (float),  photo  (image),  voice  (sound),  we  cannot  create  the  relation  in 
the  database  directly  using  INGRES.  We  have  to  separate  the  creation  into  three  parts  to 
set  up  the  three  relations,  one  for  the  relation  EMPLOYEE,  one  image  media  relation  and 
one  sound  media  relation,  as  given  below: 

1.  EXEC  SQL  CREATE  TABLE  EMPLOYEE  (fname  c20,  lname  c20,  salary  float, 
dnum  integer,  photo  integer,  voice  integer). 

2.  EXEC  SQL  CREATE  TABLE  PHOTOl  (i_id  integer,  f_id  c64,  descrp  vchar500, 
height  integer,  width  integer,  depth  integer). 

3.  EXEC  SQL  CREATE  TABLE  VOICE  1  (s_id  integer,  f_id  c64,  descrp  vchar500, 
freq  float,  samp  float,  res  integer,  encoding  integer). 

Figure  7  through  Figure  9  show  the  final  result  of  the  three  tables  in  the  database. 
Note  that  the  media  tables  have  suffixes  on  it.  As  explained  before,  this  is  done  because 
the  names  of  the  attributes  are  not  required  to  be  unique  in  the  whole  database  although  they 
are  unique  in  the  same  relation.  The  suffixes  to  be  added  to  the  media  attribute  names  are 
the  table_key  values  in  Table_Array  for  the  corresponding  relations.  For  example  the 
image  attribute  photo  will  get  the  suffix  1  because  the  table_key  value  in  the  Table_Array 
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for  the  EMPLOYEE  relation  (first  row  in  Figure  3)  is  1.  A  detailed  discussion  of  creation 
is  given  in  [PE90]. 

The  insertion  of  formatted  data  into  the  database  can  be  easily  accomplished  by 
INGRES.  The  insertion  of  media  data  cannot  be  done  directly.  The  insertion  of  media  data 
into  the  database  requires  the  establishment  of  media  files  in  the  system  beforehand  so  that 
the  system  can  insert  the  f  Jd  into  the  media  table.  Moreover,  as  the  media  table  have  other 
attributes,  like  height,  width,  and  depth  for  the  image  data  and  freq,  samp,  res,  and 
encoding  for  the  sound  data,  the  values  for  these  attributes  must  be  derived  first  prior  to  the 
insertion  operation. 

For  example,  a  user  wants  to  put  the  image  of  an  employee  into  the  photo  attribute  of 
the  EMPLOYEE  relation.  This  person  must  digitize  the  image  in  the  correct  format  for  the 
system  to  display  when  requested.  In  our  program,  the  image  can  be  captured  from  a 
camcorder  and  digitized  into  a  GIF  (Graphic  interchange  format)  file  on  a  PC,  This 
digitized  image  file  is  then  transferred  to  the  SUN  system  in  which  the  MDBMS  is 
implemented.  After  the  GIF  file  has  been  transferred  to  the  SUN  system,  we  change  the 
GIF  file  into  the  .  N  Raster  format  which  can  be  displayed  by  using  Sunview.  A  detail  of 
the  digitizing  technique  and  the  transformation  of  the  file  format  will  be  provided  in 
Appendix  A. 

When  the  user  wants  to  put  the  image  into  the  EMPLOYEE  relation,  he  only  inputs 
the  file  name  of  the  image  in  the  photo  attribute  of  EMPLOYEE  relation,  the  MDBMS  will 
generate  i_id  and  f_id  and  insert  i_id  into  the  photo  attribute  in  the  EMPLOYEE  relation  as 
well  as  i_id  in  the  photo  media  relation  namely  PHOTOl.  At  the  same  time  a  procedure 
also  extracts  the  data,  height,  width  and  depth  to  be  inserted  into  the  PHOTOl  relation. 
Similar  operation  occurs  for  the  insertion  of  sound  data.  A  detailed  discussion  of  the 
insertion  of  image  media  data  is  given  in  [PE90]  and  sound  data  in  [AT90].  The  following 
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relations  in  Figure  10  through  Figure  12  illustrate  the  case  where  user  data  has  been 
inserted  into  the  EMPLOYEE  relation. 

The  input  data  in  the  attribute  photo  and  voice  in  the  EMPLOYEE  relation  are  integer 
type  and  serve  as  the  indexes  to  the  i_id  of  the  PHOTOl  relation  and  s_id  of  VOICE1 
relation  respectively.  For  example,  ralph  w.  has  photo  in  the  first  entry  of  relation 
PHOTOl  (which  contains  'big  nose').  When  the  user  wants  to  input  the  value  for  attribute 
photo,  he  must  input  the  image  filename  which  is  '/n/virgo/work/mdbms/pl.pix'  into  the 
system.  The  system  will  insert  that  filename  into  field  fjd  of  the  relation  PHOTOl  which 
represents  the  media  attribute  photo.  At  the  same  time  height,  width  and  depth  will  be 
extracted  out  of  the  header  file  and  inserted  into  the  relation  PHOTOl  as  well.  The  system 
will  assign  i_id  to  that  photo  attribute  (which  is  1  in  this  example)  and  enter  it  in  the  photo 

attribute  column  in  the  relation  EMPLOYEE  and  the  i _ id  column  of  the  relation  PHOTOL 

After  he  enters  the  filename  into  the  database,  the  system  will  ask  for  the  description.  The 
user  will  insert  the  description  of  that  photo  which  is  'big  nose',  the  system  will  insert  the 
description  into  attribute  descrp  column  of  the  relation  PHOTOl.  The  same  operation  will 
occur  when  he  inserts  voice  into  the  tuple  of  ralph  w.  of  the  relation  EMPLOYEE.  He 
must  input  the  sound  filename  which  is  '/n/virgo/work/mdbms  /pl.snd'  into  the  system. 
The  system  will  insert  that  filename  into  f_id  of  relation  VOICE1  which  represents  the 
media  attribute  voice.  At  the  same  time  freq,  samp,  res  and  encoding  will  be  extracted  out 
of  that  file  and  inserted  into  the  relation  VOICE1.  After  that,  the  description  of  the  voice 
will  be  inserted  into  the  attribute  descrp  in  the  relation  VOICE  1  as  it  does  for  the  photo  (as 
shown  in  Figures  10  -  12). 
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Relation  name  EMPLOYEE 


fname 

lname 

salary 

dnum 

photo 

voice 

ralph  w. 

west 

80000 

1 

1 

1 

mark 

hendrickson 

25000 

1 

2 

2 

jim 

huskins 

30000 

3 

3 

3 

john 

dulle 

26000 

2 

4 

4 

george 

wilson 

32000 

1 

10 

7 

(The  input  data  in  the  attribute  photo  and  voice  in  the  EMPLOYEE  relation  are  integer  type 
and  are  used  as  the  indexes  to  the  i  id  of  the  PHOTO  1  relation  and  s  id  of  the  VOICE1 
relation  respectively.) 

Figure  10  User  relation  EMPLOYEE  after  insertion 

Relation  name  PHOTO  1 


n 

fjd 

descrp 

height 

width 

depth 

i 

/n/virgo/mdbms/pl  .pix 

big  nose 

640 

480 

8 

2 

/n/virgo/mdbms/p2.pix 

small  eyes 

640 

480 

8 

3 

/n/virgo/mdbms/p3.pix 

big  head 

640 

480 

8 

4 

/n/virgo/mdbms/p4.pix 

big  eyes 

640 

480 

8 

/n/virgo/mdbms/p5  .pix 

big  ears 

640 

480 

8 

... 

•  •  • 

.  .  . 

.  .  . 

Figure  11  media  relation  for  attribute  EMPLOYEE.photo  after  insertion 
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Relation  name  VOICE  1 


H 

f_id 

descrp 

mm 

H 

res 

encoding 

i 

/n/virgo/mdbms/p  1  .snd 

slow  voice 

10 

10 

10 

4 

2 

/n/virgo/mdbms/p2.snd 

ugly  voice 

10 

10 

10 

4 

3 

/n/virgo/mdbms/p3.snd 

meeting  in  Iraq 

10 

10 

10 

4 

4 

/n/virgo/mdbms/p5.snd 

blast  off 

10 

10 

10 

4 

7 

/n/virgo/mdbms/p9.snd 

high  pitch 

10 

10 

10 

4 

Figure  12  media  relation  for  attribute  EMPLOYEE.voice  after  insertion 


The  update  and  delete  operations  are  planned  to  work  similarly  as  in  the  operations 
just  described.  However,  since  these  operations  are  not  being  implemented  at  this  time, 
they  will  not  be  discussed,  as  their  discussion  does  not  add  to  our  understanding. 

Retrieval  of  multimedia  data  is  the  emphasis  area  of  this  thesis.  Its  design  and 
implementation  will  compose  the  rest  of  this  thesis.  Discussion  of  the  design  issues  are 
presented  in  the  next  section  of  this  chapter  and  the  implementation  aspects  in  the  next 
chapter. 

D.  RETRIEVAL  DESIGN 


The  design  of  the  retrieval  operation  is  the  most  complex  of  the  various  operations. 
As  stated  earlier,  the  MDBMS  prototype  will  support  the  extended  SQL  or  the  equivalent 
operations.  However,  SQL  on  INGRES  does  not  support  user-defined  media  types;  we 
have  to  achieve  our  goal  by  extending  the  SQL  language  and  building  more  procedures  to 
support  the  extended  language  [MLV89,  LM90].  With  the  design  to  support  media  data  as 
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described  in  the  previous  sections,  an  extended  SQL  query  may  have  to  be  decomposed 
into  multiple  subqueries  each  of  which  must  be  individually  processed,  and  the  intermediate 
results  of  which  must  be  recomposed  to  form  the  final  result  to  be  given  to  the  user.  The 
idea  of  query  decomposition  is  as  follows:  If  a  query  references  only  the  formatted  data,  it 
can  be  passed  directly  to  INGRES  without  modification;  a  decomposition  is  necessary 
whenevei  media  data  is  referenced.  The  following  query  examples  will  illustrate  the  points 
and  help  us  understand  the  operation. 

1 .  SELECT  fname,  lname,  salary 

FROM  EMPLOYEE 
WHERE  salary  >30000; 

2.  SELECT  lname,  photo 

FROM  EMPLOYEE 
WHERE  salary  >  25000; 

3.  SELECT  lname,  salary,  photo 

FROM  EMPLOYEE 

WHERE  CONTAIN  (photo,  'big  nose') ; 

(Note  that  CONT AIN  is  a  procedure  which  searches  the  photo  descriptions  for  "big  nose". 
This  method  of  searching  the  contents  of  the  multimedia  data  was  previously  presented  in 
ILM89J.) 

4.  SELECT  lname,  salary,  photo 

FROM  EMPLOYEE 

WHERE  salary  >  30000  and  dnum  =  1  and  CONTAIN  (photo,  'big  nose’) ; 

5.  SELECT  EMPLOYEE. lname,  EMPLOYEE. salary,  department.dname 

FROM  EMPLOYEE,  DEPT 

WHERE  EMPLOYEE.dnum  =  DEPT.dno; 

6.  SELECT  EMPLO  YEE. lname,  EMPLOYEE. salary,  department.dname 
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FROM  EMPLOYEE,  DEPT 

WHERE  EMPLOYEE.salary  >  20000  and 

CONTAIN  (EMPLOYEE.photo,  'big  nose')  and 
EMPLOYEE.dnum  =  DEPT.dno; 

7.  SEIJECT  lname,  fname,  photo 

FROM  EMPLOYEE 

WHERE  CONTAIN  (photo,  "big  nose")  and 
CONTAIN  (voice,  "blast  off'); 

8.  SELECT  EMPLOYEE.lname,  EMPLOYEE. fname,  DEPT.dname 

FROM  EMPLOYEE,  DEPT 

WHERE  CONTAIN  (EMPLOYEE.photo,  "big  nose")  and 
CONTAIN  (DEPT.dphoto,  "pyramid  style")  and 
(EMPLOYEE.dno  =  DEPT.dno); 

Let  us  examine  each  query  to  see  what  is  to  be  done: 

Query  1 :  No  media  data  is  referenced  we  can  just  pass  the  query  to  the  INGRES. 

Query  2:  The  same  as  query  1  but  the  selection  has  one  attribute  with  type  image.  This 
query  will  do  the  same  as  query  1  but  the  display  process  has  an  additional  operation  to 
display  the  image.  It  invokes  a  procedure  which  takes  an  i_id  from  the  query  result  and 
find  the  tuple  in  the  corresponding  image  media  relation  (eg.  PHOTOl)  whose  i_id  entry 
equals  to  the  i_id  of  the  query  result. 

Query  3:  Media  data  is  referenced  by  the  descripdon  "big  nose"  so  query  decomposition  is 
necessary.  The  query  will  divide  the  work  into  three  subqueries  as  follows: 

1.  CREATE  TABLE  FI  AS 

SELECT  all 
FROM  EMPLOYEE; 

2.  CREATE  TABLE  Ml  AS 
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SELECT  i_id 
FROM  PHOTO  1 

WHERE  CONTAIN  (PHOTO  1,  'big  nose’); 

3.  CREATE  TABLE  RESULT  AS 

SELECT  fname.lname, salary 
FROM  FI 

WHERE  (FI. photo  =  Ml.ijd); 

Query  4:  Is  similar  to  query  3  but  subquery  1  must  be  modified  to  become 

1.  CREATE  TABLE  FI  AS 
SELECT  all 
FROM  EMPLOYEE 
WHERE  salary  >  30000; 

The  rest  is  as  query  3. 

Query  5:  No  media  data  is  referenced.  Pass  the  query  directly  to  INGRES. 

Query  6:  The  media  data  is  referenced  by  the  description  "big  nose"  and  decomposition  is 
needed.  The  query  is  similar  to  query  3  and  is  broken  into  three  subqueries  as  follows: 

1.  CREATE  i  ABLE  FI  AS 
SELECT  all 

FROM  EMPLOYEE,  DEPT 
WHERE  EMPLOYEE. salary  >  20000  and 
EMPLOYEE.dnum  =  DEPT.dno; 

2.  CREATE  TABLE  Ml  AS 

SELECT  i_id 
FROM  PHOTO  1 

WHERE  CONTAIN  (PHOTOl,  'big  nose’); 

3.  CREATE  TABLE  RESULT  AS 

SELECT  fname.lname,  salary 
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FROM  FI 


WHERE  (FI. photo  =  Ml.i_id); 

Query  7:  The  media  data  is  referenced  by  the  description  "big  nose"  of  EMPLOYEE.photo 
and  the  description  "blast  off'  of  EMPLOYEE,  voice.  Query  decomposition  and  join 
operations  are  needed.  The  query  will  break  into  four  subqueries  as  follows: 

1.  CREATE  TABLE  FI  AS 

SELECT  all 
FROM  EMPLOYEE; 

2.  CREATE  TABLE  Ml  AS 

SELECT  i_id  FROM  PHOTO  1 
WHERE  CONTAIN  (PHOTOl,  ’big  nose’); 

3.  CREATE  TABLE  M2  AS 

SELECT  i_id  FROM  VOICE  1 

WHERE  CONTAIN  (VOICE1,  'blast  off); 

4.  CREATE  TABLE  RESULT  AS 

SELECT  fname,lname,  photo 
FROM  FI 

WHERE  (FI. photo  =  Ml.i_id)  and  (FI. voice  =  M2.s_id); 

Query  8:  Media  data  is  referenced  by  the  description  "big  nose"  of  EMPLOYEE.photo  and 
the  description  "pyramid  style"  of  DEPT.dphoto.  Query  decomposition  and  a  join 
operation  are  needed.  The  query  will  break  into  four  subqueries  as  follows: 

1.  CREATE  TABLE  FI  AS 

SELECT  all  FROM  EMPLOYEE,  DEPT 
WHERE  EMPLOYEE.dnum  =  DEPT.dno; 

2.  CREATE  TABLE  Ml  AS 

SELECT  i_id 
FROM  PHOTO  1 
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WHERE  CONTAIN  (PHOTO  1,  'big  nose'); 

3.  CREATE  TABLE  M2  AS 

SELECT  i_id 
FROM  DPH0T02 

WHERE  CONTAIN  (DPH0T02,  'pyramid  style’); 

4.  CREATE  TABLE  RESULT  AS 

SELECT  fname.lname,  dname 
FROM  FI 

WHERE  (FI. photo  =  Ml.i_id)  and  (Fl.dphoto  =  M2.i_id); 

After  the  system  gets  the  final  result  which  is  an  INGRES  relation,  the  system  will 
generate  a  cursor  called  cursored_output  to  print  out  the  data  one  tuple  at  a  time.  If  the 
output  contains  any  media  data,  the  resulting  table  does  not  show  us  this  fact.  The  system 
must  check  the  MDBMS  catalog  information  to  verify  this  in  order  to  handle  the  media  data 
properly.  The  process  of  creating  and  using  the  cursor  is  as  follows: 

EXEC  SQL  CREATE  CURSOR  cursor_output  AS 
SELECT  all 
FROM  RESULT ; 

EXEC  SQL  FETCH  CURSOR  cursor_output; 
print  formatted  data; 

EXEC  SQL  CREATE  CURSOR  cursor_output  AS 
SELECT  media  data 
FROM  RESULT ; 

EXEC  SQL  FETCH  CURSOR  cursor_output; 
display  the  media  data; 

Where  RESULT  is  the  resulting  relation  or  table  of  a  given  query. 
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Our  current  design  and  implementation  only  support  SQL  selections  of  the  kind  given 
in  the  above  queries.  The  complex  selections  such  as  a  nesting  condition,  or  multiple 
selections  are  not  allowed.  Multiple  selection  conditions  can  occur  with  and  and  or 
Boolean  operators.  These  conditions  have  to  be  in  the  disjunctive  normal  form.  The 
details  of  these  operations  will  be  discussed  in  Chapter  4  of  this  thesis. 
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IV.  IMPLEMENTATION  OF  THE  SYSTEM 


A.  INTERFACE  DESIGN 

In  section  III-D  we  discussed  the  retrieval  operation  using  an  extended  SQL 
language.  While  conceptually  formatted  data  and  media  data  are  processed  as  discussed,  a 
decision  was  made  not  to  use  extended  SQL  as  a  user  interface.  This  decision  was  made 
because  a  demonstration  of  the  concept  of  multimedia  data  processing  does  not  depend  on 
this  language  and  the  additional  effort  required  to  implement  the  extended  SQL  does  not 
provide  any  additional  benefit.  Consequently  the  decision  to  use  an  interactive  interface 
with  a  great  deal  of  user  prompts  was  made.  Such  an  interface  is  believed  to  be  actually 
easier  for  casual  users  to  use.  Rather  than  describing  the  interface  in  an  abstract  manner,  1 
shall  describe  it  with  examples. 

Consider  the  following  query  in  extended  SQL  form  as  given  by  a  user: 

SELECT  EMPLOYEE.lname,  EMPLOYEE. fname,  EMPLOYEE.photo,  DEPT.dname 

FROM  EMPLOYEE,  DEPT 

WHERE  ((EMPLOYEE. salary  >  20000  and  EMPLOYEE.lname  =  'wilson'  and 
CONTAIN  (EMPLOYEE.photo,  "big  nose"))  or 
(CONTAIN  (DEPT.dphoto,  "pyramid  style") )  and 
(EMPLOYEE.dnum=DEPT.dno); 

When  the  user  wants  to  specify  such  a  query  in  the  MDBMS,  the  person  shall  first 
choose  the  retrieval  option  from  the  main  menu  (as  in  Figure  13  option  3).  The  system 
then  responds  with  appropriate  instructions  step-by-step.  Each  time  when  the  user's 
response  is  entered,  the  system  will  return  to  ask  for  the  next  piece  of  information.  The 
following  operations  are  thus  required  to  complete  the  above  query  (the  Italics  represent 
the  user's  responses.): 
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MAIN  MENl 


Multimedia  Database  Management  Systei 

1.  Create  Table 

2.  Insert  tuple 

3.  Retrieve 

4.  Delete 

5.  Modify 
0.  Quit 

Select  your  choice  : 

Figure  13  Main  menu  of  the  MDBMS 

Enter  the  relation(s)  that  you  want  separated  by  (,) 

EMPLOYEE,  DEPT  <cr> 

Please  specify  the  join  condition 
EMPLOYEE. dnum  =  DEPT.dno  <cr> 

Enter  the  attribute(s)  that  you  want  from  relation  "EMPLOYEE”  separate  by  <,> 
/name,  Iname,  photo,  voice  <.cr> 

Enter  the  attribute(s)  that  you  want  from  relation  "DEPT"  separate  by  <,> 
dname  <cr> 

Condition  (y/n)  y  <cr> 

Group  Condition  (y/n)  y  <cr> 

Enter  the  relation  name  EMPLOYEE 

Enter  the  attribute  name  salary 
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Enter  the  condition 
>  20000  <cr> 

End  group  (y/n)  n 

Enter  the  relation  name  EMPLOYEE 

Enter  the  attribute 

photo  <cr> 

Enter  the  image  description 
"big  nose" 

End  group  ?  y 

More  condition  ?  y 

Enter  the  relation  name  DEPT 

Enter  the  attribute  dphoto  <cr> 

Enter  the  image  description 
"pyramid  style" 

End  group  ?  y 

More  condition  ?  n 

The  multiple  selection  conditions  must  be  represented  in  disjunctive  normal  form,  by 
using  the  Boolean  operator  and  inside  each  group,  ard  Boolean  operator  or  between 
groups  (In  the  above  illustration  the  term  group  condition  is  used).  The  idea  of  using  the 
disjunctive  normal  form  is  to  simplify  implementation  without  sacrificing  functionality  and 
usability.  The  term  group  condition  means  the  multiple  conditions  grouped  together  and 
each  group  may  have  a  single  or  multiple  conditions.  For  example,  the  conditions  in 

WHERE  ((EMPLOYEE.salary  >  20000  and  EMPLOYEE.lname  =  'wilson' 
and  CONTAIN  (EMPLOYEE.photo,  "big  nose"))  or 
(CONTAIN  (DEPT.dphoto,  "pyramid  style") )  and 
(EMPLOYEE.dnum=DEPT.dno); 
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are  composed  of  two  groups.  The  first  group  is  ((EMPLOYEE. salary  >  20000  and 
EMPLOYEE.lname  =  'wilson'  and  CONTAIN  (EMPLOYEE.photo,  "big  nose")).  The 
second  group  is  (CONTAIN  (DEPT.dphoto,  "pyramid  style").  The  join  condition  is 
(EMPLOYEE.dnum  =  DEPT.dno). 

Thus  instead  of  having  the  users  input  the  whole  query  all  at  once  in  the  SQL  form, 
the  system  will  ask  to  the  user  for  input  interactively.  When  the  user  enters  the  conditions 
into  the  query,  the  conditions  will  be  kept  in  the  same  group  until  the  user  selects  the  end 
group  condition.  The  MDBMS  then  queries  the  user  if  he  has  more  conditions  or  not.  If 
not,  then  the  DBMS  will  process  the  conditions  that  have  already  been  entered.  These 
condition  will  be  decomposed  into  disjunctive  normal  form  as  illustrated. 

When  the  above  query  is  executed,  the  system  will  display  the  formatted  data  portion 
as  shown  below  and  query  the  user  if  a  display  of  image  or  playing  the  audio  data  is 
desired.  The  system  will  respond  according  to  the  user’s  response.  The  following  is 
therefore  the  continuation  of  the  display  at  the  computer  terminal: 

Display  of  the  formatted  data 


TID 

fname 

lname 

dname 

1 

Ralph 

West 

CS 

2 

Paul 

Wilson 

cs 

Which  tuple’s  image  do  you  want  to  see  ?  1 
Do  you  want  to  display  that  image  ?  (y/n)  y 
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Quit  image  window  to  continue 

Do  you  want  to  retrieve  more  images  ?  (y/n)  n 

(After  finishing  the  first  media  the  user  may  go  to  a  second  one) 

Which  tuple's  sound  do  you  want  to  hear  ?  1 
Do  you  want  to  hear  the  sound  ?  (y/n)  y 
(The  sound  is  play  back  for  the  user) 

Do  you  want  to  retrieve  additional  data  ?  (y/n)  n 

If  the  user  query  selects  more  than  one  media  data,  the  system  will  prompt  the  user 
for  the  next  media  in  the  selection  list,  as  shown  above.  When  the  answer  is  y,  the  system 
will  again  query  which  image  or  sound  data  is  to  be  displayed  or  played.  When  the  answer 
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is  n,  the  system  will  return  to  the  main  menu  as  no  other  media  data  selection  is  wanted  by 
the  user.  The  user  can  proceed  further  to  perform  other  desired  operations. 

B.  QUERY  PROCESSING 

In  the  previous  chapter,  the  various  cases  in  which  an  extended  SQL  query  must  be 
decomposed  into  multiple  SQL  queries  are  illustrated.  This  method  of  decomposition 
requires  the  generation  of  temporary  relational  tables  for  further  processing.  Thus  in  the 
above  example  the  system  will  generate  the  temporary  tables.  Ml,  M2,  Gl,  G1  and 
RESULT  through  the  following  SQL  statements  passed  to  INGRES: 

Ml  =  SELECT  i_id 

FROM  PHOTO  1 

WHERE  CONTAIN  (PHOTOl,  ’big  nose'); 

M2  =  SELECT  ijd 

FROM  DPHOT02 

WHERE  CONTAIN  (DPH0T02,  'pyramid  style'); 

Gl  =  SELECT  EMPLOYEE.lname,EMPLOYEE.fname,EMPLOYEE.photo,  DEPT.dname 
FROM  EMPLOYEE,  DEPT 
WHERE  ((EMPLOYEE.salary  >  20000  and 
EMPLOYEE.lname  =  'wilson'  and 
(EMPLOYEE.photo  in  (SELECT  i_id  FROM  Ml))  and 
(EMPLOYEE. dn  um=DEPT.dno) ; 

G2  =  SELECT  EMPLOYEE.lname, EMPLOYEE.fname,EMPLOYEE.photo,  DEPT.dname 
FROM  EMPLOYEE,  DEPT 
WHERE  ((EMPLOYEE.salary  >20000  and 
EMPLOYEE.lname  =  'wilson'  and 
(DEPT.dphoto  in  (SELECT  i_id  FROM  M2))  and 
(EMPLOYEE.dnum=DEPT.dno); 


37 


RESULT  =  SELECT  ALL  FROM  G 1  UNION  G2; 


Note  that,  in  order  to  search  the  media  data  contents,  descriptions  from  many  media 
data  tuples  must  be  processed.  Prolog  is  used  for  this  purpose.  Natural  language 
descriptions  are  handled  by  means  of  a  parser  which  transforms  the  descriptions  into 
Prolog  predicates  and  literals  to  be  deposited  in  a  file  named  "imagei_image_facts"  to  be 
used  by  Prolog.  When  the  temporary  tables  are  obtained,  join  operation  on  the  media 
attributes  (e.g.  photo  in  the  EMPLOYEE  relation,  now  in  Gl,  and  the  i_id  column  of  the 
image  media  relation)  is  performed  to  produce  the  desired  final  result.  The  join  operation 
will  generate  the  temporary  RESULT  relation  and  a  cursor  is  declared  to  print  out  the  result 
out  of  the  RESULT  relation.  The  system  will  look  for  attributes  which  are  media  data  type 
and  will  print  out  a  message  to  ask  the  user  whether  to  display  or  play  that  media,  as 
illustrated  in  the  above  example. 

C.  DATA  STRUCTURE  FOR  RETRIEVAL  OPERATION 

Having  the  catalog  tables  as  described  in  the  previous  chapter  is  not  sufficient  to 
perform  query  processing.  As  shown  in  the  previous  sections  in  this  chapter,  the  retrieval 
operation  actually  requires  a  compiler  action  to  compile  the  user  input  into  SQL  statements 
for  INGRES.  Additional  tables  are  therefore  required  to  keep  the  various  information  for 
the  purpose  of  the  retrieval  operation.  The  example  of  the  query  stated  at  the  beginning  of 
this  chapter  can  be  used  to  illustrate  this. 

First  we  need  a  table  to  hold  the  information  for  selection.  In  order  to  process  the 
query,  the  system  needs  information  on  the  table  name,  the  attribute  names  and  their  data 
types  for  each  SELECT  operation.  The  table,  Selection_Array,  is  created  for  this  purpose 
and  it  has  the  structure  to  hold  this  information  as  shown  in  Figure  14. 
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T_name 

EMPLOYEE 

EMPLOYEE 

EMPLOYEE 

DEPT 

A_name 

fname 

lname 

photo 

dname 

Attjype 

formatted 

formatted 

image 

formatted 

Figure  14  SelectionArray  table 


The  second  structure  is  the  Condition_Array  table.  This  structure  holds  the 
conditions  for  the  query  and  it  contains  the  table  name  (Table_name),  attribute  name 
(Attribute_name),  and  the  value  condition  (condition)  for  each  selection  condition,  as 
shown  in  Figure  15.  The  conditions  are  entered  into  the  table  in  the  order  received  from  the 
user. 


1 

2 

3 

4 

Table_name 

EMPLOYEE 

EMPLOYEE 

EMPLOYEE 

DEPT 

Attribute_name 

salary 

lname 

photo 

dphoto 

Condition 

>2000 

='Wilson' 

'big  nose' 

=  'pyramid  style' 

FIGURE  15  Condition_Array  table 


The  third  structure  is  the  Group_Array  table.  This  structure  holds  the  index  to  the 
Condition_Array  table  for  each  group  in  the  query  and  it  contains  the  beginning  of  the 
group  condition  (begin_group),  and  the  ending  of  the  group  condition  (end_group)  as 
contained  in  the  Condition_Array  table.  Figure  16  is  the  result  that  corresponds  to  the 
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example  query  used  for  illustration,  stating  that  the  first  three  conditions  (1-3)  belong  to 
one  group  and  the  fourth  condition  belongs  to  the  other  group. 


begin_group 

I 

4 

end_group 

3 

4 

FIGURE  16  GroupArray  table 


To  support  media  data  not  accept  by  INGRES,  the  system  transforms  user  queries 
into  embeded  C  SQL  statements  to  be  processed  by  INGRES.  This  works  well  when  all 
the  conditions  and  variables  are  completely  defined  prior  to  the  compilation  of  an 
application  program  done  by  INGRES.  Unfortunately  in  our  circumstances,  the  MDBMS 
receives  information  from  the  users  only  at  run  time.  Since  INGRES  SQL  does  not 
support  host  variables  and  INGRES  considers  the  programs  in  MDBMS  as  application 
programs,  information  from  the  users  at  run  time  cannot  be  passed  to  INGRES  via  the 
embeded  C  SQL  statements.  To  solve  this  problem,  we  have  to  modify  the  C  code 
generated  by  IN  BS  in  the  precompilation  process,  when  SQL  statements  have  already 
been  transformed  into  C  code,  in  such  a  way  that  variables  can  assigned  values  at  run  time. 
The  result  is  then  compiled  by  the  C-compiler  for  execution. 

D.  PROGRAM  STRUCTURE  FOR  RETRIEVAL  OPERATION 

The  database  operations  are  written  in  the  programming  language  C  and  are  separated 
into  5  submodules  as  followed: 

1.  The  create  table  module 

2.  The  insertion  module 

3.  The  query  module 

4.  The  deletion  module 
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5.  The  update  module 

Operations  4  and  5  are  not  implemented  at  this  time  and  will  not  be  discussed.  The 
other  operations  are  as  follows: 

1 .  The  create  table  module  is  also  implemented  by  Pei  and  the  detailed  design  and 
implementation  is  in  [PE90]. 

2.  The  insertion  module  is  also  implemented  by  Pei  and  the  detailed  design  and 
implementation  is  in  [PE90]. 

3.  The  query  module  is  the  module  that  accept  the  queries  from  users  and  access  the 
database  and  the  media  data  to  get  the  result.  It  is  separated  into  4  submodules  as  follows: 

3. 1  The  main  program  for  retrieving  is  procedure  retrieve().  In  order  to  do 
retrieval,  the  users  will  be  asked  to  enter  the  selection  of  the  table(s)  and  attribute(s)  that 
they  want  to  retrieve.  If  a  user  does  not  know  the  names  of  the  tables  or  attributes,  he  can 
use  the  help  prompt  by  typing  '?'  to  list  all  the  tables  and  attributes  in  the  catalog  before 
proceeding  any  further. 

3.2  Procedure  process_condition()  is  the  procedure  to  process  conditions 
and  will  accept  the  table  names,  attribute  names  and  then  check  the  attribute  type  from  the 
catalog  to  see  if  the  attribute  values  are  valid.  If  the  attribute  is  media  data  type,  then  the 
media  condition  for  this  attribute  is  set  to  "true".  This  procedure  also  checks  for  the  group 
condition.  If  it  is  a  group  conditions,  then  the  procedure  gcondition  is  invoked.  Otherwise 
the  procedure  process_query  is  used. 

3.3  Procedure  gcondition().  For  each  group,  a  value  for  the  beginning  and 
ending  of  each  group  is  assigned.  The  procedure  accepts  the  conditions  given  by  the  user 
and  insert  them  into  the  Condition_Array  table  as  specified  in  Figure  15. 
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3.4  Procedure  process  icon().  This  process_icon  procedure  is  used  to 
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Army  table. 


3.5  Procedure  getatttype().  This  procedure  will  search  the  catalog  to  find 
the  attribute  type  to  be  returned  to  the  calling  program. 


3.6  Procedure  p_att().  This  procedure  is  used  when  a  user  needs  help  to 
find  the  attribute  names.  He  just  types '?'  for  printing  all  the  attribute  names  of  thr  table  he 
selected. 


3.7  Procedure  p_table().  Tl.is  procedure  is  used  when  a  user  needs  help  to 
find  the  table  names.  He  just  types '?’  to  print  all  the  table  names  in  the  database  catalog. 

3.8  Procedure  process_query().  After  a  user  completes  his  input,  the 
MDBMS  will  display  the  pseudo  extended  SQL  code  on  the  screen. 

3.9  Procedure  process_query2().  This  procedure  will  determine  whether 
decomposition  of  a  query  is  needed.  If  so,  the  decomposition  will  be  done  and  subqueries 
are  set  up.  Intermediate  tables  are  created  as  necessary  and  recomposition  is  done  to 
produce  the  final  result. 

3.10  Procedure  dispIay_photo  (imageno).  If  a  user  selects  to  display  the 
image,  this  procedure  will  be  invoked.  The  image  corresponding  to  the  image  number 
(imageno)  from  the  calling  program  will  be  displayed. 

3.11  Procedure  play_sound  (soundno).  If  a  user  selects  to  play  the 
sound,  this  procedure  will  be  invoked.  The  sound  corresponding  to  the  sound  number 
(soundno)  from  the  calling  program  will  be  played. 

The  detail  of  this  code  is  in  APPENDIX  B  of  this  thesis. 
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E.  HOW  TO  LINK  AND  RUN  THE  SYSTEM 


The  system  is  built  on  the  SUN  workstation  under  the  server  name  Virgo  at 
NPS.CS.NAVY.MIL  under  account  /n/virgo/mdbms/mdbms/demos2.  Demos2  is  an 
object  code  module  ready  for  execution.  The  program  itself  is  called  demos2.sc.  It  was 
done  with  a  C  precompiler  which  is  listed  as  ESQLC  demos2.sc.  This  ESQLC  will 
produce  demos2.c.  After  we  get  demos2.c,  we  have  to  compile  this  program  into  an  object 
program  and  link  it  to  the  INGRES  library  and  the  other  subprograms  which  include 
ISfunctions.o,  ISsubroutines.o,  comcprolog.o,  suntools  library,  sunwindows  library,  and 
sunpixrects  library.  The  other  files  that  are  needed  in  the  same  directory'  are  parser^, 
imagei_irrage_dicts  and  imagei_image_facts.  To  make  this  link  process  simpler,  a  macro 
Makefile,  is  used  and  is  given  as  follows: 

# 

OBJMODS  =  ISfunctions.o  comcprologl.o  ISsubroutine.o 
#ING_HOME  =  /ingres 
demos2:  demos2.o  $(OBJMODS) 
cc  demos2.o  -o  demos2  \ 

Angres/lib/libqlib  /ingres/lib/compatlib  \ 

$(OBJMODS)\ 

-lsuntool  -lsunwindow  -Ipixrect  -lm 

demos2.c:  demos2.sc 
esqlc  demos2.sc 
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When  a  user  wants  to  compile  and  link  a  new  implementation  of  the  demos2,  he 
just  types  "make  dcnios2"  at  the  prompt  of  the  Unix  operating  system.  The  execution 
module  will  be  named  demos2. 
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V.  CONCLUSIONS  AND  SUMMARY 


Many  applications  requires  the  use  of  both  formatted  and  media  data.  The  handling 
of  multimedia  data  imposes  new  requirements  on  database  management  systems,  especially 
when  the  integrated  support  of  conventional  and  multimedia  data  is  needed.  In  this  thesis, 
an  approach  to  integrating  conventional  alphanumeric  and  multimedia  data  is  achieved  using 
the  abstract  data  type  concept.  We  use  the  INGRES  relational  DBMS  for  maintaining  the 
conventional  standard  data  and  the  media  relations. 

This  thesis  outlined  some  sample  applications  in  which  multimedia  data  is  required 
and  presented  a  design  of  the  system  to  support  the  various  database  operations. 
Specifically  it  showed  how  the  catalog  information  is  stored  for  the  processing  of  both 
formatted  and  multimedia  data  and  how  the  retrieval  operation  for  these  data  can  be 
achieved  by  decomposing  a  user  query  into  multiple  subqueries,  the  results  of  which  are 
recomposed  to  form  the  final  result.  To  achieve  our  goal,  additional  tables  must  be 
designed  to  store  the  various  kinds  of  information  for  a  single  selection  operation.  Many 
examples  were  presented  throughout  the  thesis  to  illustrate  our  points. 

Although  conceptually  a  SQL-like  query  interface  is  assumed,  an  interactive  interface 
was  implemented  for  the  system.  This  was  believed  to  be  more  usable  and  simpler  to 
implement.  Prompting  was  used  generously.  A  user  can  work  on  the  system  with  very 
little  background  or  knowledge  about  the  system’s  handling  of  formatted  and  media  data. 

For  lack  of  time  not  all  the  database  operations  have  been  implemented.  Two 
companion  theses  [PE90,  AT90],  done  concurrently,  provided  the  support  of  table 
creation,  data  insertion,  and  sound  data  management.  Image  data  management  was  done  in 
some  previous  works  [Th88].  This  thesis  concentrated  on  the  implementation  of  the 
retrieval  process.  Except  for  the  nested  queries,  nearly  all  the  operations  related  to  the 
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select  statement  in  SQL  can  be  done  with  the  work  done  in  this  thesis.  To  process  a  single 
select  statement  in  SQL  involving  media  data,  the  query  must  be  decomposed  into 
subqueries.  Temporary  intermediate  tables  are  produced  as  a  result.  The  final  result  can 
only  be  obtained  through  the  use  of  join  operations.  In  essence,  the  retrieval  operation  as 
described  in  this  thesis  acts  like  a  mini-compiler  for  an  extended  SQL  query. 

The  handling  of  multimedia  data  with  the  alphanumeric  data  in  a  DBMS  is  more  than 
just  adding  new  relations  into  the  database.  The  approach  proposed  in  the  MDBMS 
prototype  can  retrieve  media  data  based  on  their  contents,  described  in  natural  language 
form.  The  processing  of  the  descriptions  of  the  media  data  cannot  be  done  with  SQL  or  in 
any  database  systems  like  INGRES.  We  had  to  use  a  parser  and  Prolog  to  process  these 
descriptions. 

At  present  only  sound  data  and  image  data  are  supported.  However,  it  is  straight 
forward  to  extend  the  capability  to  handle  other  media  data  in  a  similar  manner.  The 
concept  of  handling  both  formatted  data  and  media  data  is  amply  illustrated  through  the 
capability  of  supporting  these  two  kinds  of  media  data. 

Future  works  will  continue  on  more  operations,  including  the  update  and  delete.  The 
development  of  a  better  user  interface  for  the  system,  the  help  utility,  and  transaction 
processing  are  planned  for  the  MDBMS  prototype. 
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APPENDIX  A 


PROGRAM  CODE  FOR  TRANSFORMATION  OF  IMAGE 


Color  image  can  be  entered  into  the  MDBMS  by  first  capturing  the  image  with  the 
video  camera,  then  inputing  this  video  signal  into  an  IBM-compatible  PC  equipped  with  the 
Super  VIA  card1  to  form  an  image  digitize  into  an  image  file.  This  is  acheieved  by 
connecting  the  video  output  connector  in  the  video  camera  to  the  video  input  (RCA  jack)  of 
the  Super  VIA  card,  by  running  the  program  svu.exe  in  the  PC  to  capture  the  image  from 
the  video  camera,  and  finally  by  transferring  this  file  to  the  SUN  system  through  FTP  (File 
Transfer  Protocol).  However,  the  file  in  the  PC  must  be  in  the  GIF  format  and  the  file 
transfer  mode  must  be  set  to  binary  file  mode  before  using  FTP.  The  program  giftoras 
must  be  invoked  to  convert  the  GIF  file  to  SUN  raster  file  format  prior  to  insertion  into 
MDBMS.  This  can  be  done  by  typing  the  following  command  at  the  Sun  workstation: 

giftoras  [gif filename)  >  (raster filename) 


After  the  change  to  raster  file  we  can  check  by  typing  showpix  followed  by  raster  filename 
and  the  picture  will  be  shown  on  screen.  The  detail  operation  of  capturing  the  images  with 
the  video  camera  is  given  in  [PE90].  The  program  for  converting  GIF  format  to  raster  file 
format  was  received  from  Dr.  Klaus  Meyer- wegener  of  University  of  Erlangen-Nuemberg, 
Germany,  and  has  been  modified  to  fit  into  our  needed  and  environment.  The  following 
printout  is  the  modified  program. 


^  **********  ********************************>11* 
*  GIF  to  SUN  rasterfile  * 

*********************************************/ 
I* 


*  Usage: 

*  gif2ras  <gif-file>  >  <sun-rasterfile> 

*  Compile: 

*  cc  gif2ras.c  -o  gif2ras  -lpixrect 


Super  Video  Input  adapters  products  from  Jovian  Logic  Corporation  1990. 
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*/ 


#include  <stdio.h> 

#include  <rasterfile.h> 

char  *malloc(); 
int  stmcmpO; 

#define  FALSE  0 
#define  TRUE  1 
#define  COLSIZE  256 
#define  PICSIZE  2; 

#defme  SHOWCOUNT  10; 


/* 

*  Rasterfile  variables 
*/ 

struct  rasterfile  header; 

/* 

*  LZW  structures  and  variables 
*/ 

typedef  int  bool; 
unsigned  char  *stackp; 
unsigned  int  prefix[4096]; 
unsigned  char  suffix[4096j; 
unsigned  char  stack[4096]; 

int  datasize,codesize,codemask;  /*  Decoder  working  variables  */ 
int  clear,eoi;  /*  Special  code  values  */ 

int  avail; 
int  oldcode; 

/* 

*  GIF  variables 
*1 

FILE  *infile; 

unsigned  int  screenwidth;  /*  The  dimensions  of  the  screen  */ 

unsigned  int  screenheight;  /*  (not  those  of  the  image)  */ 

unsigned  int  rscreenwidth;  /*  The  dimensions  of  the  raster  */ 

bool  global;  /*  Is  there  a  global  color  map?  */ 

int  globalbits;  /*  Number  of  bits  of  global  colors  */ 

unsigned  char  globalmap[COLSIZE][3];/*  RGB  values  for  global  color  map  */ 

char  bgcolor,  /*  background  color  */ 

unsigned  char  *raster,  /*  Decoded  image  data  */ 

unsigned  left,top,width,height,rwidth; 

char  *progname; 
char  *filename; 

void  convert(); 
int  checksignatureQ; 
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void  readscreenO; 
int  readimage(); 
void  readextension(); 
int  readrasterO; 
int  processO; 
void  outcodeO; 
void  initrasterQ; 
void  initcolors(); 
int  rasterizeO; 
void  usage(); 


main(argc,argv)  /*  main  program  for  converting  */ 
int  argc; 
char  *argv[]; 

{ 

extern  int  optind; 
extern  char  *optarg; 
int  flag; 

progname  =  *argv; 

while  ((flag  =  getopt(argc,  argv,  ""))  !=  EOF)  { 
switch  (flag)  { 

default  :  fprintf(stderr,  "ignoring  unknown  flag  %c\n",  flag); 
usage(); 

} 

if  (optind  >=  argc)  { 
filename  =  "stdin"; 
convert(); 

} 

else  { 

filename  =  argv[l]; 

if  ((infile  =  fopen(filenanie,"r"))  ==  NULL)  {  /*  test  for  open  input  file  name  */ 
perror(filename); 
exit(l); 

) 

convert(); 

fclose(inflle); 

} 

#if  deflned(ARGS) 
else 

while  (optind  <  argc)  { 
filename  =  argvjoptind]; 
optind++; 

if  ((infile  =  fopen(filename,”r"))  ==  NULL)  {  /*  test  for  open  input  file  name  */ 
perror  (filename); 
continue; 
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} 

convertO; 

fclose(infile); 

} 

#endif 


}  /*  main  */ 


/*  start  converting  GIF  to  SUN  raster  file  */ 
void  convertO 
{ 

char  ch; 

/*  fjprintf(stderr,  "%s:\n",  filename);  */ 
if  (checksignatureO) 
return; 
readscreen(); 

while  ((ch  =  getc(infile))  != &&  ch  !=  EOF)  { 
switch  (ch)  { 

case  ’SO':  break;  /*  this  kludge  for  non-standard  files  */ 
case if  (readimage()) 
return; 
break; 

case readextension(); 
break; 

default:  fprintf(stderr,  "illegal  GIF  block  typeW); 
return; 
break; 

} 

} 

}  /*  convert  */ 

/*  Check  for  the  GIF  file  (GIF  file  has  the  signature  GIF87  at 
the  beginining  of  the  file  header  */ 
checksignatureO 
{ 

char  buf[6]; 

fread(buf,  1 ,6,infile); 
if  (strncmp(buf,"GIF",3))  { 
fprintf(stderr,  "file  is  not  a  GIF  fileNn"); 
return  1; 

) 

if  (stmcmp(&buf[3],"87a",3))  { 

fprintf(stderr,  "unknown  GIF  version  number\n");  /*  GIF87  is  the  GIF  version  */ 
return  1; 

} 

return  0; 

}  /*  checksignature  */ 
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t* 

*  Get  information  which  is  global  to  all  the  images  stored  in  the  file 

*/ 

f 

void  readscreen() 

{ 

unsigned  char  bufI7]; 

fread(buf,  1 ,7,infile); 

screenwidth  =  buf[0]  +  (buf[l]  «  8); 

rscreen width  =  screenwidth  +  screenwidth%2;  /*  compensate  odd  widths  */ 
screenheight  =  buf[2]  +  (buf[3]  «  8); 
global  =  buf[4]  &  0x80; 
if  (global)  ( 

globalbits  =  (buf[4]  &  0x07)  +  1; 
fread(globalmap,3,l«globalbits,  infile); 

} 

bgcolor  =  buf[5]; 

/* 

fprintf(stderr, "  global  screen:  ‘  6dx%dx%d,  backgroundcolor:  %d\n", 
screenwidth,  screenheight,  l«globalbits,  bgcolor); 

*/ 

)  /*  readscreen  */ 


/*  Read  the  image  file  and  check  the  colormap  */ 

readimageO 

{ 

unsigned  char  buf[9]; 
bool  local,  interleaved; 
char  localmap[256][3]; 
int  localbits; 
register  row; 
register  i; 

if  (fread(buf,  1,9,  infile)  ==  0)  { 
perror(filename); 
exit(l); 

} 

left  =  buf[0]  +  (buf[  1]  «  8); 

top  =  buf[2]  +  (buf[3]  «  8); 

width  =  buf[4]  +  (buf[5]  «  8); 

rwidth  =  width  +  width%2;  /*  compensate  odd  widths  */ 

height  =  buf[6]  +  (buf[7]  «  8); 

local  =  buf[8]  &  0x80; 

interleaved  =  buf[8]  &  0x40; 

/* 

fprintf(stderr, "  image:  %dx%d  %s  org:  %d,%d\n",  width,  height, 
interleaved  ?  "interleaved" :  "",  left,  top); 
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*1 

if  (local  =  0  &&  global  =  0)  { 

fprintf(stderr,  "no  colormap  present  for  image\n"); 
return  1; 

} 

if  ((raster  =  (unsigned  char*)  malloc(rwidth*height))  = 
fprintf(stderr,  "not  enough  memory  for  image\n"); 
return  1; 

} 

if  (readraster(  width,  height)) 
return  1; 

if  (local)  { 

localbits  =  (buf[8]  &  0x7)  +  1; 

/* 

fprintf(stderr,  "  local  colors:  %d\n",  l«localbits); 

*/ 

fread(localmap,  3,  l«localbits,  infile); 
initraster(  l«iocalbits); 
initcolors(localmap,  l«localbits,  bgcolor); 

}  else  if  (global)  { 
initraster(l«globalbits); 
initcolors(globalmap,  l«globalbits,  bgcolor); 

} 

rasterize(interleaved,  raster); 
free(raster); 

return  0; 

}  /*  readimage  */ 


/* 

*  Read  a  GIF  extension  block  (and  do  nothing  with  it). 
*/ 

void  readextensionO 

{ 

unsigned  char  code; 
int  count; 
char  buf[255]; 

code  =  getc(infile); 
while  (count  =  getc(infile)) 
fread(buf,  1,  count,  infile); 

}  /*  readextension  */ 


/* 


NULL)  { 
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*  Decode  a  raster  image 
*/ 


readraster(  width,  height) 
unsigned  width, height; 

{ 

unsigned  char  *fill  =  raster, 
unsigned  char  buf[255]; 
register  bits=0; 
register  unsigned  datum=0; 
register  unsigned  char  *ch; 
register  int  count,  code; 

datasize  =  getc(infile); 
clear  =  1  «  datasize; 
eoi  =  clear  +  1; 
avail  =  clear  +  2; 
oldcode  =  -1; 
codesize  =  datasize  +  1; 
codemask  =  (1  «  codesize)  - 1; 
for  (code  =  0;  code  <  clear,  code++)  { 
prefix[code]  =  0; 
suffixfcode]  =  code; 

} 

stackp  =  stack; 

for  (count  =  getc(infile);  count  >  0;  count  =  getc(infile))  { 
fread(buf,  1  ,count,infile); 
for  (ch=buf ,  count--  >  0;  ch++)  { 
datum  +=  *ch  «  bits; 
bits  +=  8; 

while  (bits  >=  codesize)  { 
code  =  datum  &  codemask; 
datum  ■»=  codesize; 
bits  -=  codesize; 

if  (code  ==  eoi)  {  /*  end  of  image  */ 

goto  exitloop;  /*  because  some  GIF  files*/ 

}  /*  aren't  standard  */ 

if  (process(code,  &fill))  { 
goto  exitloop; 

} 

) 

} 

if  (fill  >=  raster  +  width*height)  { 
fprintf(stderr,  "raster  full  before  eoi  code\n"); 
goto  exidoop; 

} 

} 

exidoop: 

if  (fill  !=  raster  +  width*height)  { 

fprintf(stderr,  "warning:  wrong  rastersize:  %ld  bytesW, 
(long)  (fill-raster)); 

fprintf(stderr, "  instead  of  %ld  bytesNn", 

(long)  width*height); 
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return  0;  /*  can  still  draw  a  picture  ...  */ 

return  0; 

}  /*  readraster  */ 


Process  a  compression  code,  "clear"  resets  the  code  table.  Otherwise 

*  make  a  new  code  table  entry,  and  output  the  bytes  associated  with  the 

*  code. 

*/ 

process(code,  fill) 
register  code; 
unsigned  char  **fill; 

{ 

int  incode; 

static  unsigned  char  firstchar, 

if  (code  —  clear)  ( 
codesize  =  datasize  +  1; 
codemask  =  (1  «  codesize)  -  1; 
avail  =  clear  +  2; 
oldcode  =  -l; 
return  0; 

} 

if  (oldcode  ==  -1)  { 

*(*fill)++  =  suffix[code]; 
firstchar  =  oldcode  =  code; 
return  0; 

} 

/*  if  (code  >  avail)  { 

fprintf(stdenr,  "code  %  d  to  large  for  %d\n",  code,  avail); 
return  1; 

) 

*/ 


incode  =  code; 

if  (code  ==  avail)  {  /*  the  first  code  is  always  <  avail  */ 

*stackp++  =  firstchar; 
code  =  oldcode; 

} 

while  (code  >  clear)  { 

*stackp++  =  suffix[code]; 
code  =  prefix[code]; 

} 
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*stackp++  =  firstchar  =  suffixfcode]; 
prefix[avail]  =  oldcode; 
suffixfavail]  =  firstchar, 
avail++; 

if  (((avail  &  codemask)  ==  0)  &&  (avail  <  4096))  { 
codesize++; 
codemask  +=  avail; 

} 

oldcode  = incode; 
do  { 

*(*fiU)++  =  *— stackp; 

}  while  (stackp  >  stack); 

return  0; 

}  /*  process  */ 

/*  init  raster  row  and  column  size  */ 

void  initraster(numcols) 
int  numcols; 

{ 


header.ras_magic=  Ux59a66a95; 
header.ras_width=  rwidth; 
header  ,ras_height=  height; 
header.ras_depth=  8; 
header.ras_length=  rwidth  *  height; 
header  .ras_type=  RT_STANDARD; 
header.ras_maptype=  RMT_EQUAL_RGB; 
header.ras_maplength=  3*numcols; 

if  (fwrite(&header,  sizeof(header),  1,  stdout)  ==  0)  { 
perror(progname); 
exit(l); 

} 


}  /*  initraster  */ 


/* 

*  Convert  a  color  map  (local  or  global)  to  arrays  with  R,  G  and  B 

*  values.  Pass  colors  to  SUNVIEW  and  set  the  background  color. 
*/ 


void  initcolors(colormap,  ncolors,  bgcolor) 
unsigned  char  colormap[COLSIZE][3]; 
int  ncolors; 
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int  bgcolor, 

{ 

register  i; 

unsigned  char  red  [COLS  IZE]; 
unsigned  char  green  [COLS  IZE]; 
unsigned  char  blue[COLSIZE]; 


/* 

fprintf(stderr, "  "); 

*/ 

for  (i  =  0;  i  <  ncolors;  i++)  { 
red[i]  =  colormap[i][0]; 
gir’nfi]  =  colormap[i][l]; 
blue[i]  =colormap[i][2j; 

/* 

fprintf(stderr, "  %3u:  %3u,  %3u,  %3u",  i,  red[i],  green[i],  blue[i]); 
if  (i%3  ==  2)  fprintf(stderr,  "\n  "); 

*/ 

} 


/* 

fprintf(stderr,  "\n  Background:  %3u:  %3u,  %3u,  %3u\n",  bgcolor, 
red[bgcolor],  green  [bgcolor],  blue[bgcolor]); 

*/ 


if  (fwrite(red,  1 ,  ncolors,  stdout)  ==  0)  { 
perror(progname); 
exit(l); 

1 

if  (twnte(green,  1,  ncolors,  stdout)  ==  0)  { 
perror(progname); 
exit(l); 

} 

if  (fwnte(blue,  1 ,  ncolors,  stdout)  ==  0)  { 
perror(progname); 
exit(l); 


}  /*  initcolors  */ 


/* 

*  Read  a  row  out  of  the  raster  image  and  write  it  to  the  screen 
*/ 

rasterize(interleaved,  raster) 
int  interleaved; 

register  unsigned  char  *raster; 

{ 

register  row,  col; 
register  unsigned  char  *rr; 
unsigned  char  *  newras; 
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#define  DRAWSEGMENT(offset,  step)  \ 

for  (row  =  offset;  row  <  height;  row  +=  step)  {  \ 
rr  =  newras  +  row*rwidth;  \ 

bcopy(raster,  rr,  width);  \ 

raster  +=  width;  \ 

} 


if  ((newras  =  (unsigned  char*)  malloc(rwidth*height))  ==  NULL)  { 
fprintf(stderr,  "not  enough  memory  for  imageNn"); 
return  1; 

} 

rr  =  newras; 
if  (interleaved)  { 

DRA WSEGMENT(0,  8); 

DRAWSEGMENT (4,  8); 

DRAWSEGMENT(2,  4); 

DRAWSEGMENTG,  2); 

} 

else 

DRAW  S  EGMENT  (0, 1); 

if  (!fwrite(newras,  1,  rwidth*height,  stdout))  { 
perror(progname); 
exit(l); 

} 

free(newras); 


}  /*  rasterize  */ 


/*  print  error  for  usage  error  */ 
void  usage() 

{ 


fprintf(stderr,  "usage:  %s  [-lenum]  [-s<num>]  [-b]  gif-files\n", 
progname); 


)  /*  usage  */ 
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APPENDIX  B 


PROGRAM  CODE  FOR  MULTIMEDIA  DATA 
RETRIEVAL  MANAGEMENT 

********************************************************* ***★************/ 

. . . ***** . ***/ 

f  MDBMS  */ 

/*  The  query  interface  of  the  multimedia  database  management  system  */ 

/*  Date:  19  Sep  1990  */ 

f*  Modify  Date:  */ 

/************«*******««**************************************************♦**/ 
/*********************♦*************** ********** ********** ******************y 

/*  The  purpose  for  this  program  is  to  demonstrate  the  prototype  of  the  */ 

/*  Multimedia  Database  Management  System  */ 

/***********•*******«*•*•*«*•*•**************************««********♦♦******/ 

y* it**#****##*************#*************************************************/ 

#include  <stdio.h> 

#include  <string.h> 

#include  <pixrect/pixrect_hsh> 

#include  <sys/wait.h> 

#include  <suntool/sunview.h> 

#include  <suntoo  1/canvas. h> 

/*  For  sound  module  had  to  include  the  socket  file  */ 

#  include  <sys/types.h>  /*  Sound  module  */ 

#  include  <sys/socket.h>  /*  Sound  module  */ 

#  include  <netinet/in.h>  /*  Sound  module  */ 

#  include  <netdb.h>  /*  Sound  module  */ 

#  include  ”snd_errs.c” 

/*  To  connect  to  the  INGRES  DBMS  we  have  to  set  commmuni cation  area  */ 

#  include  Yingre s/file Veqsqlca.h” 

static  IISQLCA  sqlca  =  {0} ;  /*  SQL  Communications  Area  */ 

#define  NOT_FOUND  100  /*  Not  found  for  the  search  */ 

#define  F1LENAMELEN  64  /*  Max  for  filename  is  64  V 

#define  DESCRLEN  500  /*  Define  the  description  data  to  500  char  */ 

#define  ERRMLEN  70 

#define  DESCR_WORD_ERR  -30000  /*  The  parser  check  for  error  code  */ 

#define  DESCR_STRUCTURE_ERR  -3000 1  /*  The  parser  check  for  error  code  */ 

#define  QUERY_WORD_ERR  -30002  /*  The  parser  check  for  error  code  */ 

#define  QUERY_STRUCTURE_ERR  -30003  /*  The  parser  check  for  error  code  V 

#define  DESCR_TOO_LONG_ERR  -30004  /*  The  parser  check  for  error  code  */ 

#define  PROGRAM_ERR  400  /*  The  parser  check  for  error  code  */ 

#define  NAME_LENGTH  1 3 
#define  ERROR  FREE  0 
#define  SOUND_ERROR  - 1 

#define  TRUE  1  /*  Defined  for  create  &  insert  operation  */ 

#define  FALSE  0  /*  Defined  for  create  &  insert  operation  */ 

#define  MAX_TABLE  20  /*  Defined  for  create  &  insert  operation  */ 

#define  MAX  ATT  200  /*  Defined  for  create  &  insert  operation  */ 

#define  MAX_PATH  64  /*  Defined  for  create  &  insert  operation  */ 

#define  MAX_PHRASE  127  /*  Defined  for  create  &  insert  operation  */ 
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#define  MAX_DESCRP  500  /*  Defined  for  create  &  insert  operation  */ 

#define  NOT_FOUND  100  /*  Defined  for  create  &  insert  operation  V 

/*  Structure  for  the  sound  header  file  used  to  get  the  registration  datum  */ 

/*  when  insert  a  sound  media  into  database  */ 

typedef  struct  SND_HDR  { 

char  sfname[13]; 
int  s_size; 
int  s_samp Irate; 

int  s_encoding; 
float  s_duration; 
int  s_resolution; 

}; 

struct  SND_HDR  s_hdr; 

char  c;  /*  For  catrige  return  only  */ 

typedef  char  STR_name[  13];  /*  For  both  table  name  and  att  name  */ 

typedef  char  STR_value[  21];  /*  For  all  vales  of  data  type  c20  */ 

typedef  char  STR_path[MAX_PATH+ 1  ];  /*  The  f_id  of  media  records  V 
typedef  char  STR_descrp[MAX_DESCRP+l  ];/*  The  description  of  media  record  */ 
/*  Structure  for  the  table  catalog,  used  to  get  information  from  text  file*/ 

/*  "dbtable”  which  hold  the  standard  relations  in  MDBMS  */ 

typedef  struct  table  { 

STR  name  table_name; 
int  table_key; 
int  att_count; 
int  att_entry; 

}; 

struct  table  table_array[MAX_TABLE];  /*  Relation  table  in  database  */ 
int  table_index;  /*  Next  available  index  of  table_array  */ 

int  table_listlMAX_TABLE];  /*  Integer  array  hold  the  index  of  table_array  */ 
int  table_count  =  0,  /*  #  of  index  (relation)  in  table_list  */ 
table_cursor=  0,  /*  Current  index  of  tablejist  */ 
table_entry  =  0;  /*  Current  index  of  table_list  which  get  */ 

/*  by  the  function  check_table_name()!!  */ 

/*  Structure  for  the  attribute  catalog,  used  to  get  information  from  text  */ 

/*  file  ’"dbatt”  which  hold  all  attributes  exist  in  MDBMS  and  grouped  */ 

/*  together  associate  to  each  relation  from  1st  att  to  last  att  */ 

typedef  struct  att  { 

STR_name  att_name; 

STR_name  data_type; 

int  media_id;  /*  Next  available  ID  */ 

int  next_index; 

int  value_entry; 

}; 

struct  att  att_array[MAX_ATT];  /*  All  the  att  name  in  database  */ 
int  att_index  =  0,  /*  Next  available  index  of  att_array  */ 
att_cursor  =  0,  /*  Current  index  of  att_array  */ 
att_count  =  0;  /*  #  of  attribute  entered  during  creation  */ 

STR_name  data_type;  /*  Global  string  variable  */ 

char  table_name(40];  /*  Global  string  variable  for  temterary  read  in  */ 

char  att_name(40];  /*  Global  string  variable  for  temterary  read  in  */ 

/*  Declare  more  to  avoid  bus  error  */ 

int  act_media_list[10];  /*  Active  index  of  media  att_name  in  operation  */ 
int  act_media_count;  /*  #  of  index  in  act_media_list  */ 

STR_name  media_name;  /*  Global  string  variable  used  to  generate  */ 

/*  the  unique  media  table  name  in  database  */ 
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int  table_key;  /*  Append  key  for  the  media  attribute  name  in  that  table  */ 
int  img_value[20],snd_value[20],i_value[20);  /*  Data  value  arrays  */ 
float  f_value[20];  f*  Data  value  arrays  */ 

STR_value  c_value[20];  /*  Data  value  arrays  */ 

int  img  index  =  0,  /*  Indices  of  data  value  arrays  */ 

snd_index  =  0,  /*  Indices  of  data  value  arrays  */ 

i_index  =  0,  /*  Indices  of  data  value  arrays  */ 

f_index  =  0,  f*  Indices  of  data  value  arrays  */ 

c_index  =  0;  /*  Indices  of  data  value  arrays  */ 

/*  Structure  to  hold  whole  tuple  values  in  image  media  relation  */ 
typedef  struct  img  { 

int  i_id; 

STR_path  f_id; 

STR_descrp  descrp; 
int  height; 
ini  width; 
int  depth; 

h 

struct  img  img_record[20];  /*  Values  of  image  media  relation  */ 

/*  Structure  to  hold  whole  tuple  values  in  sound  media  relation  */ 
typedef  struct  snd  { 

int  s_id; 

STR_path  f_id; 

STR_descrp  descrp; 
int  size; 
int  samp__rate; 
int  encoding; 
float  duration; 
int  resolution; 

}; 

struct  snd  snd_record[20];  /*  Values  of  sound  media  relation  */ 

STR  descrp  descrp;  /*  Global  for  insert  tuple  operation  */ 

FILE  *img_file,  *snd_file;  /*  Global  for  insert  tuple  operation  */ 
typedef  struct  group  {  /*  begin  and  end  group  for  condition  */ 

int  begingroup; 
int  endgroup; 

}; 

char  join_condition[  100]; 

typedef  struct  select_att  {  /*  selection  attribute  */ 

STR_name  t_name; 

STR_name  aname; 

STR_name  datatype; 
int  -riedia_type; 

}; 

int  look_more=0;  /*  use  for  loop  the  cursor  */ 

typedef  struct  select  tab  { 

STR_name  t_name; 
int  tab_index; 

}; 

struct  select_att  satt[  1 0]; 
struct  selectjab  stab]  10]; 
struct  group  group_count[  1 0]; 
int  o,p,k,numcon,numgroup,icond; 

STR_name  tab[  1 0]; 
char  condition!  1 00]; 
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f*  Selection  attribute  */ 
t*  Condition  attribute  V 
STR_name  att[  10]; 

/*  Each  group  of  attribute  */ 
intatt  _group{10]; 

/*  Condition  type  of  each  attribute  0  for  formatted  1  for  image  2  for  sound*/ 
int  contype[10]; 

/*  Media  attribute  for  description  */ 

STR_name  media_att[  10]; 
int  number_media; 

/*  Condition  for  each  attribute  */ 
char  con[10][100]; 

I*  Attribute  type  for  each  select  */ 

STR_name  atttype]  1 0]; 

int  cond,gcond,i_cond[10],m=0>x=0,y=0,n=0,o=0; 

char  buff]  100],a,yes_no_answerO; 

/**********«*************************** **************************** *********/ 
/*  Get  yes  or  no  answer  from  user  V 

/**********************«*************************************«**************/ 

char  yes_no_answer() 

{ 

char  answer  =  ’?’; 
answer  =  getcharO; 

while  (!(answer  ==  ’y’  ||  answer  ==  ’n’)) 

{ 

printf(”\nPlease  answer  y  for  yes  or  n  for  no::”); 

answer  -  getcharO; 

while  ((c  =getchar())  !=  \n’) 

» 

} 

getcharO;  /*  To  let  the  next  gets()  works  properly  and  nothing  else  */ 
return  (answer); 

}  /*  End  of  yes_no_answeri)  */ 

!+  ****** ******************** ************* ***********************************/ 
/*  To  clear  screen  */ 

/*********•**«*************** ******************* ******************** ********/ 

void  cir_scrO 

{ 

putcharO\033‘); 

putchaKT); 

putcharCH’); 

putchar('\033'), 

putchaK’]’); 

putchar(T); 

}  /*  End  of  clr_scrO  */ 

/** *••*••*****•*»**••••*••*****•*•*•*•**********••••*••*••**•*•**• »•»*******/ 
/*  Assign  -1  to  next_index  in  the  last  att_name  to  indicate  the  end  of  list*,' 
/*******•*••**************«*****,*************••**•**********************•**/ 

void  assign_end_mark() 

{ 

int  i  =  0, 

last_index  =  0; 

for  (i  =  0;  i  <  table_count;  i  +  +  ) 

( 

last_index  +=  table_array[i].att_count; 
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att_array[last_index-l  ].next_index  =  -1;  /*  assign  end  mark  here  */ 

}  /*  End  of  for  loop  */ 

}  /*  End  of  assign_end_mark()  */ 

/****************«***** *********************************** ♦*****************/ 
/*  Send  command  from  SUN  to  PC  to  play  the  SOUND  media  file  */ 

*••••••*••«••••*•**•••• *****************••*»*****•***•********************/ 

play_sound(filename) 
char  ‘filename; 

{ 

char  *pcname=”pclum2”;  /*  Remote  PC  host  name  */ 

short  port  =  2000;  /*  Virtual  port  number  between  SUN  &  PC  */ 

int  sock; 

struct  sockaddrjn  server; 

struct  hostent  *hp,  *gethostbyname(); 

char  buf[  1024]; 

/♦  P rPJltP  cry'ltAf  */ 

sock  =  socket(AF_INET,  SOC K_STRE AM ,  0); 
if  (sock  <  0)  { 

perror(”opening  stream  socket”); 
return; 

} 

/*  Connect  socket  using  name  specified  by  command  line.  */ 
server.sin_family  =  AFINET; 
hp  =  gethostbyname(pcname); 
if  (hp  ==  0)  { 

fprintfistderr,  ”%s:  unknown  host\n”,  pcname); 
return; 

} 

bcopy((char  *)hp->h_addr,  (char  *)&server.sin_addr,  hp->h_length); 
server.sin_port  =  htons(port); 
if  (connect(sock, 

(struct  sockaddr  *)&server,  sizeof  server )  <  0)  { 

perrorC connecting  stream  socket”); 

return; 

} 

if  (write(sock,filename,12)  <  0)  /‘gets  the  filename  for  playing*/ 
perror(”Writing  on  stream  socket”); 
close(sock); 
return; 

} 

I* ***»*****************************»****«*********»****»****»**************»/ 

/*  Get  the  header  information  from  the  sound  text  file  which  is  already  */ 

/*  sent  from  PC  to  SUN  */ 

!+  **************************************** **********************************/ 

snd_load(  fi  lename) 

char  ‘filename;  /*  Given  input  text  file  */ 

{ 

FILE  *f; 

if  ((f  =  fopen(filename,”r”))  =~  NULL)  /*  open  for  reading  */ 

{ 

displayed  ROPEN); 
return  SOUND_ERROR; 

} 

/ *  *****  read  the  header  from  the  predesignated  input  file  */ 
fscanf(f,”%s”,s_hdr.sfname); 
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fscanf(f,”%d”,&s_hdr.s_size); 

fscanf(f,”%d’,,&s_hdr.s_samplrate); 

fscanf(f,’,%d”,&s_hdr.s_encoding); 

fscanftf,"%P’,&s_hdr.s_duration); 

fscanf(f,”%d”,&s_hdr.s_resolution); 

fclose(f); 

return; 

} 

. . . . . . . . . 

/*  Load  catalog  datum  from  3  files:  "dbtable”,  "dbatt”  and  "dbkey”  */ 

. . . . ***** . . . 

void  load_dataO 

{ 

RLE  *f,  *g,  *h; 

STR_name  dummy; 
int  entry=0, 
i=0; 

f  =  fopen("dbtable”,’’r”);  /*  Read  the  table  for  catalog  into  memory  */ 
ift!feof(0) 

fscanf(f,”%s”, dummy);  /*  Skip  the  first  dummy  line  in  file  */ 

while  (!feof(f)) 

{ 

fscanf(f,”%s%d%d”,  table_array[table_index].table_name, 

&table_array[table_index  ].table_key , 

&  tabl  e_array  [  table_index  ].  att_count ); 
table_array[table_index].att_entry  =  entry; 
entry  +=  table_array[table_index].att_count; 
table_index  ++; 

} 

fclose(f);  /*  close  the  input  file  */ 

table_count  =  table_index; 

if  (table_count  !=  0)  /*  i.e.  database  is  NOT  empty  */ 

{ 

for  (i  =  0;  i  <  table_count;  i++  ) 
table_list[i]  =  i; 

g  =  fopen(”dbatt”,”r”);  /*  Read  the  attribute  file  to  catalog  in  memory  */ 
if(!feof(g)) 

fscanf(g,’’%s’’, dummy);  /*  Skip  the  first  dummy  line  in  file  */ 
while  (!feof(g)) 

{ 

fscanf(g,”%s%s%d”,att_array[att_index].att_name, 

att_array[att_index  ].dala_type, 

&att_array  [att_index  ] .  med  ia  Jd ); 
att_array[att_index].next_index  =  att_index+l; 
att_index  +  +  ; 

} 

fclose(g);  /*  close  the  attribute  file  */ 
assi  gnendmarkO; 
h  =  fopenC’dbkeyVr’'); 

if(!feof(h)) 

fscanf(h,”%s”, dummy);  /*  Skip  the  first  dummy  line  in  file  */ 

while  (Ifeofih)) 

fscanf(h,”%d”,  &taole_key);  /*  Next  avjiilable  table  key  append  to  */ 
fclose(h);  /*  the  end  of  media  att_name  is  unique  */ 

} 
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else 

{ 

printf(”EMPTY  DATABASE!  !\n\nHit  return  to  continued”); 

putchar(\OOT); 

table_key  =  1; 

while((c  =  getcharO)  !=  ’\n’) 

;  /*  Not  return  do  nothing  */ 

}  /’End  of  if*/ 

}  /*  End  of  load_data()  V 

********************************************************* 
Save  catalog  datum  back  to  3  files  same  as  above  */ 
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void  store_data() 

{ 

FILE  *f,  *g,  *h; 

STR_name  dummy; 
int  i  =  0, 
j  =  0, 
count  =  0, 
entry  =  0; 

strcpy(dummy,  ”***dummy***”); 
if  (table_count  >  0) 

{ 

f  =  fopen(”dbtable”,”w”); 
fprintf(f,”%s”,  dummy); 
for  (i  =  0;  i  <  table_count;  i++) 

fprintf(f,”\n%s\t%d\t%d”,  table_array[table_list[i]].table_name, 

table_array[table_list[i)].table_key, 

table_array[table_list(i]].att_count); 

fclose(f); 

g  =  fopen(”dbatt  ”,  ”w”): 

fprintflg^yos”,  dummy); 

for  (i  =  0;  i  <  table_count;  i+  +  ) 

{ 

count  =  table_array[tabIe_list[i]].att_count; 
entry  =  table_array[table_list[i]].att_entry; 
for  (j  =  0;  j  <  count;  j+  +  ) 

{ 

f print  f(g,”\n  %s\t  %s\t%d”,  att_array{entry].att_name, 

att_anay  [entry  ]  .data_type , 
att_array[entry].media_id); 
entry  =  att_array[entry].next_index; 

)  /*  End  of  for  loop  j  */ 

}  /*  End  of  for  loop  i  */ 
fclose(g); 

li  -  fopeuCdbkeyVw”); 
fprintf(h,”%s”,  dummy); 
fprintf(h,”\n%d”,  table_key); 
fclose(h); 

}  /*  End  of  if  tab!e_count  >  0  */ 

}  /*  End  of  store_data()  */ 

j* *»******»******«*••****•**»*****»**»•************•****»******»************/ 

/*  Print  out  data  information  on  screen  (TEMPERARY  FOR  CHECKING  PURPOSE)  */ 

/* **•*»**•*»*************************•»********»****•********»**************/ 

void  print_out_data() 
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{ 

int  i  =  0, 
j  ~  0, 
count  =  0, 
entry  =  0; 

printf(”\n”);  /*  New  line  */ 
for  (i  =  0;  i  <  table_count;  i++) 

printtf(”%  1 2s\t%dM%d\t%d\n”,  table_array[table_list[i}].table_name, 

table_array[table_list[i  ]].table_key, 
table_array[table_list[i]].att_count> 
table_array[table_list[i]].att_entry); 

while  ((c  =  getcharO)  !=  Vi’) 

» 

for  (i  =  0;  i  <  table_count;  i++) 

{ 

count  =  table_array[table_list[i]].att_count; 
entry  =  table_array[table_list[i]l.att_entry; 
for  (j  =  0;  j  <  count;  j++) 

{ 

printf(”%12s\i%12s\t°/od\n”,att_array[entry].att_name, 

att_array  [entry  1  ,data_type , 
att_array  [  en  trjT  ] .  med  i  a_id , 
att_array[entry].next_index); 
entry  =  att_arrav[entry].next_index; 

}  /*  End  of  for  loop  j  */ 
while  ((c  =  getcharO)  !=  \n’) 

> 

}  /*  End  of  for  loop  i  */ 

}  /*  End  of  print_out_data()  */ 

I** ************* ************************************************************/ 

/*  Get  the  user  choice  */ 

^******^m ************************************************************ *******/ 

char  user_choice() 

{ 

char  answer  = 

while  (!( ’0’<=  answer  &&  answer  <=  ’6’)) 

{ 

clr_scr0; 

printf(”\n\t\tMultimedia  Database  Management  SystemNn”); 
printR”\t===================================\n”); 

printf(”\n\tl.  Create  Table”); 
printf(”\n\t2.  Insert  Tuple”); 
printf(”\n\t3.  Retrieve”); 
printf(”\n\t4.  Delete”); 
printf(”\n\t5.  Modify”); 

printf(”\n\t6.  Print  out  current  data  information(test  purpose)”); 
printf(”\n\t0.  Quit\n”); 

prirttf("'t======== ========= - “======'*1”); 

printf(”\n\tSelect  your  choice  ::  ”); 

answer  =  getcharO; 

while  ((c  =  getcharO)  !=  ’\n’) 

;  /*  Not  return  do  nothing  */ 

}  /*  End  of  while  */ 
return  (answer); 

}  /*  End  of  user_choice()  */ 
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. . . . / 

/***********»*********«****  start  for  CREATION  ********»*•**********»*******/ 
/•***************************»************•******»**************************/ 

. . . . . . . ***•*/ 

/*  Check  the  table_name  if  its  last  char  is  any  digit,  which  is  not  allowed*/ 

/*  because  the  media  table  is  unique  across  the  whole  database  by  appending*/ 

/*  the  particular  table_key  from  ’O’  to  *999’  in  this  program  */ 

^** ********************************************************************** ***^ 
int  check_last_char(c_last) 
char  cjast; 

I 

int  found  =  FALSE;  /*  Initialize  to  false  */ 
if  (’O’  <=  c_last  &&  c_last  <=  ’9’) 
found  =  TRUE; 
return  (found); 

}  /*  End  of  check_last_char(c_last)  */ 

/****.**• . ****** . ****** . . . *************** . **/ 

/*  Check  the  table_name  if  it  is  duplicate  */ 

^******* *********************************************************** *********/ 
int  checktable_name() 

{ 

int  i  =  0; 

int  found  =  0;  /*  Initialize  to  false  */ 
while  ((Kfound))  &&  (i  <  table_count)) 

{ 

if  (strcmp(table_array[table_index].table_name, 

table_array[table_list[i]].table_name)  ==  0) 

{ 

found  =  TRUE; 

table_entry  =  i;  /*  Don’t  use  ”table_cursor  =  i”  because  */ 

}  /*  table_cursor  can’t  change  in  the  */ 

else  /*  function  ”change_table_name()”H  */ 

i  +  +  ; 

}  /*  End  of  while  */ 
return  (found); 

}  /*  End  of  check_table_name()  */ 

^******************* ********************************************** **********/ 
/*  Check  the  att_name  if  it  is  duplicate  within  the  relation  in  the  First  */ 

/*  9  characters.  Because  the  last  3  characters  are  used  to  append  the  key  */ 

int  check_att_name() 

{ 

int  i  =  0, 
entry; 

int  found  =  0;  /*  Initialize  to  false  */ 
char  new_att_name[9], 
exit_att_name[9); 

stmcpy(new_att_name,  att_array[att_index].att_name,  9); 
new_att_name[9]  =  *\0’;  /*  To  end  of  the  string  */ 
entry  =  table_array[tableJist[table_cursor]].att_entry; 
while  ((.'(found))  &&  (i  <  att_count))  /*  att_count  is  global  var  */ 

{ 

stmcpy(exit_att_name,  att_array[entry].att_name,  9); 
exit_att_name[9]  =  M)’;  /*  To  end  of  the  string  */ 
if  (strcmp(new_att_name,  exit_att_name)  ==  0) 
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found  =  TRUE; 

else 

( 

i++; 

entry  =  att_array  [entry  ]  .next_index ; 

)  t*  End  of  if  else  */ 

}  f*  End  of  while  */ 
return  (found); 

}  /*  End  of  check_att_name()  */ 

/*******************•************************«******•*******•***************/ 
f*  Return  the  datatype  which  selected  from  user.  We  allow  c20  as  the  only  V 
f*  character  data  type  at  this  time,  it  could  be  able  to  allocate  the  */ 

/*  data  value  array  dynamically  by  mallac  to  make  it  more  flexible  */ 
/*******«**********************«****************£**************************♦/ 

void  select_data_type() 

{ 

char  answer  =  ’?’; 

while  ((c  =  getcharO)  !=  \n’) 

;  /*  Not  return  do  nothing  V 

while  (!( T<=  answer  &&  answer  <=  ’5’)) 

{ 

printf(”\nSelect::(l)integer  (2)float  (3)c20  (4)image  (5)sound”); 
printf(”\n\Select  your  choice  ::  ”); 
answer  =  getcharO; 
while  ((c  =  getcharO)  !=  Nn’) 

;  /*  Not  return  do  nothing  */ 

}  /*  End  of  while  */ 
switch  (answer) 

{ 

case  T: 

strcpy(data__type,  "integer”); 
break; 

case  ’2’: 

strcpy(data  type,  "float”); 
break; 

case  ’3’: 

strcpy(data_type,  ”c20”); 
break; 

case  ’4’: 

strcpy(data_type,  "image”); 

break; 

case  ’5’: 

strcpy(data_type,  "sound”); 
break; 

}  /*  Ened  of  switch  */ 

}  /*  Ena  oi  select_data_type()  */ 

/♦ft*************************************************************************/ 

/*  Get  the  att_name,  data_type  from  user  input  */ 

/ft**************************************************************************/ 

void  get_alt_name() 

{ 

int  found  =  TRUE; 
char  set  down  =  ’n’; 
while  (found) 

{ 
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printf(”\nEnter  attribute  name:(Maximum  12  characters  An”); 
att_name(0]  =  \0’; 
scanf(”%s”,  att_name); 

if  (strlen(att_name)  >=13)  /*  Over  maximum  name  length  */ 

{ 

printf(”\nSorry!!  Attribute  Name  OVER  12  characters!”); 
putchar(\007’); 

} 

else 

{ 

stmcpy(att_array[att_index].att_name,  att_name,  12); 
found  =  check_att_name(); 
if  (found) 

{ 

print f(”The  first  9  characters  must  unique  !\n”); 
printf(”The  duplicate  attribute  name  entered  !\n”); 
printf(”Invalid  attribute  name!  ENTER  AGAIN!  !\n”); 
putchar(V)07’); 

} 

else 

{ 

printf(’\nSelect  data  type  of  attribute::”); 
while  (set_down  !=  ’y5) 

{ 

select_data_type( ); 

printfi’VData  Type:  %s?  (y/n)::",  data_type); 
setdown  =  yes_no_answer(); 

} 

strcpy(att_array[alt_index].dala_type,  data_type); 

}  /*  End  of  if  else  */ 

}  /*  End  of  if  else  */ 

}  /‘End  of  while  */ 

}  /*  End  of  get_att_name()  */ 

/******************************************************* **«*«* r  **************/ 

/*  Create  a  relation  table  according  to  the  user  input  V 

y*  **************************************«***********************************/ 

void  create_table() 

{ 

char  more_att  =  ’y’;  /*  More  att_name  or  not  */ 
int  i  =  0, 
entry, 
name_len; 

int  table_found  =  TRUE;  /*  Initialize  to  true  */ 
while  (table_found) 

{ 

printf(”\nEnter  table_name:(Maximum  1 2  characters)\n”); 
table_name[0]  =  \Q'\ 
scanf(”%s”,  table_name); 

if  ((namejen  =  strlen(table_name))  >=  1 3)  /"Over  maximum  name  length*/ 

{ 

printfCVi Sorry'!  Table  Name  OVER  12  characters!"); 
putchar{’\007’); 
l 

else 

{ 
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if  (chec  k_  last  _char(table_naine  ( name_l  en  - 1  ])) 

{ 

printf(”Sorry!  Please  never  end  a  table  name  with  a  digit  !\n”); 
printf(”Invalid  table  name!  ENTER  AGAIN  !!\n”); 
putchar(\007’); 

} 

else 

{ 

strcpy(table_anay[table_index].table_name,  table_name); 
table_found  =  check_table_name(); 
if  (table_found) 

{ 

printf(’The  duplicate  table  name  entered  !\n”); 
printf(”Invalid  table  name!  ENTER  AGAIN  !!\n”); 
putchar(\007’); 

} 

}  /*  End  of  if  else  */ 

}  /*  End  of  if  else  */ 

}  /*  End  of  while  (found)  */ 
table_array[table_index].table_key  =  table_key; 
table_array[table_index].att_entry  =  att_index; 
table_list[table_countl  =  table_index; 
table_key++; 

table_cursor  =  table_count; 
table_count++; 

att_count  =  0;  /*  Initialize  as  zero  at  beginning,  global  in  each  time  V 
while  (more_att  ==  ’y’) 

{ 

get_att_name(); 

att_array[att_index].media_id  =  1; 
att_array[att_index].next_index  =  attjndex  +  1; 
att_index++; 
att_count++; 

printf(”\nMore  attribute  in  the  table?  (y/n)::”); 
more_att  =  yes_no_answer(); 

}  /*  End  of  while  */ 

att_array[att_index  - 1  J.next_index  =  - 1 ;  /*  Assign  the  end  mark  */ 
table_array[table_index].alt_count  =  att_count; 
table_index  ++; 

}  /*  End  of  create_table()  */ 

/*******♦***♦*************»********♦*********************»*********♦********/ 

/*  Get  the  user  choice  to  modify  the  current  table  in  create  operation  */ 

!+ ***********♦**************************************♦*******%***************/ 

char  modify _choice() 

{ 

char  answer  = 

getcharO;  /*  NOTHING  but  extract  out  the  previous  CR  */ 
while  (!(( ’0’<=  answer  &&  answer  <=  ’5’)  || 

(answer  ==  Ti')  j|  (answer  ==  ’H'))) 

{ 

printfr\n\t\tModify  Table  Menu  for  Creation\n”); 

printff^r^-1--'— - ==--jj^^==== - —=====”  ==ny, 

printf(”\n\t  1 .  Change  Table  Name”); 
printf(”\n\t2.  Change  Attribute  Name”); 
printf(”\n\t3.  Change  Data  Type”); 
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printf(”\n\t4.  Insert  A  Attribute”); 
printf(”\n\t5.  Delete  A  Attribute”); 
printf(”\n\tO.  Quit”); 

printf(”\n\th  or  H::  Show  current  information\n”); 

prirtft”^  — - = - - ==  =  - = ==  = =to”); 

printf(”\n\t Select  your  choice  ::  ”); 

answer  =  getcharO; 

while  ((c  =  getcharO)  !=  Nn’) 

;  /*  Not  return  do  nothing  */ 

}  /*  End  of  while  */ 
return  (answer); 

}  f*  End  of  modify_choice()  */ 


/********** . ****** . ****** . ****** . 

/*  Print  out  the  current  table  which  the  user  want  to  modify  */ 

. . . . . . ***** . . ***"/ 


void  print_table() 

{ 

int  i  =  0, 
count  =  0, 
entry  =  0; 
clr_scr(); 

entry  =  table_arrayItable_list[table_cursor]].att_entry; 
count  =  table_axTayItable_list[table_cursor]].att_count; 
printf("\nTable  Name::  %s\n”, 

table_array[table_list[table_cursor]].table_name); 
printf("\nOrdeAtAttribute  Name\t\tData  Type\n”); 
for  (i  =  0;  i  <  count;  i++) 

{ 

printf(”  %d  \t%13s\t\t%s\n”,(i+l) ,  att_array[entiy].att_name, 

att_array[entry].data_type); 

entry  =  att_array[entry].next_index; 

}  /*  End  of  for  loop  i  */ 

)  /*  End  of  print_table()  */ 

/****************♦**************************************************♦*******/ 
/*  Change  the  current  table  name  which  the  user  want  to  create  V 

****************************************************** ********************/ 
void  change_table_name() 

{ 

int  table_found  =  TRUE; 
while  (table  found) 

{ 

printf(”\nCurrent  Table  Name::  %s\n\n”, 

table_array(table_list[tabIe_cursor]].tabIe_name); 
printf(”Change  to::”); 
table_name[0]  =  NO’; 
scanf(”%s”,  table_name); 

if  (strlen(table_name)  >=  13)  /*  Over  maximum  name  length  */ 

{ 

printf(”\nSorry!!  Table  Name  OVER  12  characters!”); 
putchaKNOOT); 

} 

else 

{ 

strcpy(table_array[table_index  ].table_name,  table_name); 
table_found  =  check_table_name{); 


70 


if  (table_found) 

{ 

printfCVThe  duplicate  table  name  entered! ! !\n”); 
printf(”\nlnvalid  table  name!  ENTER  AGAIN! !  !\n”); 
putcharC\007); 

}; 

}  /*  End  of  if  else  *, 

}  /»  End  of  while  */ 

strcpy(table_anay[table_list[table_cursor]].table_name, 

table_array  [table_index  ].table_name); 
printf(”\nNew Table  Name::  %s\n\n”, 

table_array  [  table_li  st  [table_cursor  ]  ] .  tablejname ); 
while  ((c  =  getchaif))  !=  V) 

}  /*  End  of  change_table_name()  */ 

/**************************** *************«*********************************y 

/*  Change  the  name  of  current  attribute  which  the  user  want  to  create  */ 

/**********************V* ****** ************* *******»************************/ 

void  change_att_name() 

{ 

int  i  =  0, 
count  =  0, 
entry  =  0, 
order  =  0; 
int  found  =  TRUE; 
print_table(); 

printf(”Select  the  order  which  you  want  to  change  its  name::\n”); 
printf(”Any  other  key  to  cancel  the  operation!!  Select::”); 
scanf(”%d”,  &order); 

entry  =  table_array[table_list[table  cnrsor]].att_entry; 
count  =  table_array[table_list[table_cursorll.att_count; 
if  ( 1  <=  order  &&  order  <=  count) 


for  (i  =  1;  i  <  order;  i+  +  ) 
entry  =  att_array[entry].next_index; 

att_cursor  =  entry;  /*  Assign  the  current  index  of  att_array  */ 
while  (found) 

{ 

printf(”\nCurrent  Att  Name::  %s\n\n”, 

att_array(att_cursor].att_name); 

printf(  "Change  to::”); 
att_name[0]  =  \0’; 
scanf(”%s”,  attname); 

if  (strlen(att_name)  >=  13)  /*  Over  maximum  name  length  */ 

{ 

printf(”\nSorry!!  Attribute  Name  OVER  12  characters!"); 
putchar(\007’); 

} 

else 

{ 

strcpy(att_array[att_index  ].att_name,  att_name); 
found  =  check_att_name(); 
if  (found) 

{ 

printf(”The  duplicate  attribute  name  entered !\n”); 
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printfC’Snlnvalid  attribute  name!  ENTER  AGAIN  !!!\n”); 
putcharC\007’); 

} 

else 

{ 

strep  y(att_array[att_CTirsor].att_name, 

att_anay[att_index  ].att_name); 
printf(TViNew  Att_Name::  %s\n\n", 

att_array[att_cursor].att_name); 

}  f*  End  of  if  else  */ 

}  /*  End  of  if  else  */ 

}  /*End  of  while  */ 

} 

else 

{ 

printf("\nSorry!  You  entered  the  wrong  order!!  Please  redo  againAn”); 

putchar0\007’); 

while  ((c  =  getcharO)  !=  An’) 

}  /*  End  of  if  else  */ 

}  /*  End  of  change_att_name()  */ 

. . . ***** . ».»******..****•***•**..***.*....*.**/ 

/*  Change  the  data  type  of  current  attribute  which  the  user  want  to  create  */ 

/**************************•******************%************«****************/ 

void  change_data_type() 

{ 

int  i  =  0, 
count  =  0, 
entry  =  0, 
order  =  0; 

char  set_down  =  ’n’; 
print_table(); 

printf( "Select  the  order  which  you  want  to  change  the  data  type::\n”); 
printf(”Any  other  key  to  cancel  the  operation! !  Select::”); 
scanf(”%d”,  &order); 

entry  =  table_array[table_list[table_cursor]].att_entry; 
count  =  table_array[table_list[table_cursor]].att_count; 
if  (1  <=  order  &&  order  <=  count) 

{ 

for  (i  =  1;  i  <  order;  i++) 
entry  =  att_array[entry].next_index; 

att_cursor  =  entry;  /*  Assign  the  current  index  of  att_array  */ 
printf(”\nCurrent  Att_Name::  %s\n”, 

att_array[att_cursor].att_name); 
printf(”Current  Data_Type::  %s\n”, 

att_array[att_cursor].data_type); 

printf(”Change  to:: "); 
while  (set_down  !=  ’/) 

{ 

select_data_type( ); 

printfCAnData  Type:  %s?  (y/n)::”,  data_type); 
set_down  =  yes_no_answer<); 

} 

strcpy(att_array[att_cursor].data_type,  data_type); 
printf(”\nAtt_Name::  %s\n”,  att_array[att_cursor).att_name); 
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printf(”New  Data  Type::  %s\n”,att_arraylatt_cursor].data_type); 

} 

else 

{ 

printftAnSorry!  You  entered  the  wrong  order!!  Please  redo  again.Nn”); 

putcharC\007’); 

while  ((c  =  getcharO)  !=  V) 

}  f*  End  of  if  else  */ 

}  /*  End  of  change_data_type()  */ 

/******«****«*********************«********************* ft*******************/ 

/*  Insert  a  new  attribute  before  create  operation  */ 

/****************************************•******************««***«***♦***«**/ 

void  insert_att() 

{ 

int  i  =  0, 
count  =  0, 
pre_entry  =  0, 
entry  =  0, 
order  =  0; 
print_table(); 

printf(”Select  the  order  where  new  attribute  you  want  be!  !\n”): 
printf(”(Maximum  +  1 )  will  add  new  attribute  at  the  end!  !\n”); 
printf(”Select  the  new  attribute’s  order:  :\n”); 
printf(”Any  other  key  to  cancel  the  operation!!  Select::”); 
scanf(”%d”,  &order); 

entry  =  table_array[table_list[table_cursor]].att_entry; 
count  =  tablearray  (tablelist  [tablecursor  ]  ]  .attcount ; 
if  (1  <=  order  &&  order  <=  (count  +  1)) 

{ 

for  (i  =  1;  i  <  order;  i++) 

{ 

pre_entry  =  entry; 

entry  =  att_arTay[entry].next_index; 

} 

get_att_name(); 

att_array[att_indexl.media_id  =  1; 

/*  Rearrange  the  link  list  of  attributes  in  the  relation  */ 
if  (order  ==  1) 

table_array[table_listitable_cursor]].att_entry  =  attjndex; 
else 

att_array[pre_entry!.rK‘X?ir:dex  =  attjndex; 
att_array[att_index].next_index  =  entry; 
attjndex++; 
att_count  +  +  ; 

table_array[table_list[table_cursor]].att_count  =  att_count; 

} 

else 

i 

printfC'vnSorry!  You  entered  the  wrong  order!!  Please  redo  again. \n”); 

putchaH'\007’); 

while  ((c  =  getcharO)  !=  Vi’) 

}  /*  End  of  if  else  */ 

}  /*  End  of  insert_att()  */ 
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/************«*********************************«****************************/ 
/*  Delete  a  attribute  before  create  operation  */ 

/•*****•******•*••*• . ************ . 

void  delete_alt() 

{ 

int  i  =  0, 
count  =  0, 
pre_entry  =  0, 
entry  =  0, 
order  =  0; 
print_table(); 

printf(”Select  the  order  of  attribute  which  you  want  delete:  :\n”); 
printf(”Any  other  key  to  cancel  the  operation!!  Select::”); 
scanf(”%d”,  &  order); 

entry  =  table_array[tab!e_list[table_cursor]].att_entry; 
count  =  table_an-ay(table_list[table_cursor]].att_count; 
if  (1  <=  order  &&  order  <=  count) 

{ 

for  (i  =  1;  i  <  order;  i++) 

{ 

pre_entry  =  entry; 

entry  =  att_arraylentry].next_index; 

) 

att_cursor  =  entry; 

printf(”\nDelete  %s?  (y/n)::”,  att_array[att_cursor].att_name); 
if  (yes_no_answer()  ==  V) 

{  /*  Rearrange  the  link  list  of  V 

if  (order  ==  1)  /*  attributes  in  the  relation  */ 

table_array[table_list[table_cursorj].att_entry 
=  att_array  [entry  ).next_index; 

else 

att_array[pre_entry].next_index 

=  att_array[entry].next_index; 
att_count— ; 

table_arrav[tablejist[table_cursor]].att_count  =  att_count; 

} 

else 

;  /*  End  of  if  else  */ 

} 

else 

{ 

printf(~\r>Sorry'  You  entered  the  wrong  order!!  Please  redo  again.'\n”); 

putcharC\007’); 

while  ((c  =  getcharf)) !~  Vi’) 


}  /*  End  of  if  else  */ 

}  /*  End  of  delete_att()  */ 

/♦♦♦♦••♦♦♦•♦••a*************************************************************/ 

/*  Modify  the  current  table  which  the  user  want  to  create  */ 

void  modify_table() 

{ 

char  answer  =  ’?’; 
while  (answer  !=  ’O') 

{ 


74 


answer  =  modify  _choice(); 
switch(answer) 

{ 

case  T : 

change_table_name{ ); 
break; 

case  ’2’ : 

change_att_name(); 

break; 

case  ’3’ : 

change_data_type( ); 
break; 

case  ’4’ : 

insert_att(); 

break; 

case  ’5’ : 

delete_att(); 

break; 

case  ’0’ : 

break; 

case  ’H’ ; 
case  Ti’ ; 

print_table(); 

break; 

}  /*  End  of  switch  */ 

}  /*  End  of  while  */ 

}  /*  End  of  modify  tableO  */ 

/*».*•».••••**.»»•***««**»****•***»****»***•****»*.»»»*»•*»*»*******»*******/ 

/*  Display  the  table  information  that  the  user  entered  before  create  */ 
/*•*»**»«•*********«**»**»***«*******»*»**«*******»*»*«**»******************/ 

void  display _infoO 

{ 

char  modify  =  ’y'; 
while  (modify  ==  ’>’ ) 

{ 

clr_scr(); 

print_table(); 

printf(”\nAny  change  before  create0  (y/n 
modify  =  yesnoansweri); 
if  (modify  ==  ’y’) 
modify_table(); 

(  /*  End  of  while  */ 

}  /•  End  of  display_info()  */ 

/ . * . . . . . . 

/*  Get  media  table  name  bv  appending  table  key  at  the  end  of  att_name  V 

/ . . . . . . . . . / 

void  get  media  nameO 

{ 

int  index;  /*  Index  of  string  used  to  append  table  key  into  att  name  V 
int  i_key,  /*  Integer  value  of  table_key  */ 
key  no,  /*  #  of  digits  of  key  */ 

i  =  0; 

char  key ( 3  ];  /*  Allow  maximum  3  appended  table  keys  */ 
i_key  =  tabie_array[tabie_lisl!table_cursorJi  table  key; 
if  (0  <=  i  key  &&  i  key  9) 
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{ 

key [0 ]  =  i_key  +  48;  /*  int  0  converts  to  char  0  */ 
key_no  =  1; 

> 

if  (10  <=  i_key  &&  i_key  <=  99) 

{ 

key[  1  ]  =  (i_key  /  10)  +  48;  /*  1st  append  key  */ 
key[0]  =  (i_key  %  10)  +  48;  /*  2nd  append  key  */ 
key_no  =  2; 

} 

if  (100  <=  i_key  &&  i_key  <=  999) 

{ 

key[2]  =  (i_key  /  100)  +  48;  /*  1st  append  key  */ 

key [  1  ]  =  ((i_key  %  100)  /  10)  +  48;  /*  2nd  append  key  */ 
key[0]  =  (i_key  %  10)  +  48;  /*  3rd  append  key  */ 

key_no  =  3; 

} 

index  =  strlen(media_name); 

if  ((index  +  key_no)  >=  12)  /*  Maximum  length  of  att_name  */ 

{ 

media_name[12]  =  \0";  /*  Assign  Y)’  to  the  end  of  string  */ 
for  (i  =  0;  i  <  key_no;  i++) 
media_name[ index  -  (i  +  1)]  =  key[i]; 

} 

else 

{ 

media_name[index  +  key_no]  =  media_name[ index];  /*  Move  \0'  to  end*/ 
for  (i  =  0;  i  <  key  no;  i++) 
media_name[(index  +  key_no)  -  (i  +  1)]  =  key[i]; 

}  /*  End  of  if  else  *! 

}  /*  End  of  get_media_name()  */ 

y*  **************♦***********************************************************/ 

/*  Translate  SQL  statement  to  create  a  MEDIA  relation  V 

J+  ****************♦*******************************************»*************/ 

void  ql_create_media__table() 

{ 

int  i  =  0; 

for  (i  =  0;  i  <  act_media_count;  i+  +  ) 

{ 

strcpy(media_name,  att_array[act_mediajist(i]].att_name); 
get_media_name( ); 

printf(”  create  table  %  1 2s  (”,  media_name); 

strcpy (data_type ,  att_array  [act_medi a _1  ist [ i  ]  ] .datatype); 

if  (strcmp(data_type,  ’’image”)  ==  0) 


{ 

printf(”i_id  integer, \n  ”); 

printf(”f_id  c64,\n  ”); 

printf(”descrp  vchar500,\n  ”); 

printf(”height  integer, \n  ”); 

printf(”width  integer, \n  ”); 


printf( "depth  integer);\n\n"); 

} 

else 

{ 

printf(”s_id  integer,\n  ”); 
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printf(”f_id  c64,\n  ”); 

printf(”descrp  vchar500,\n  ”); 

printf(”size  integer ,\n  ”); 

printf(”samp_rate  integer, \n  ”); 

printf(”encoding  integer, \n  ”); 

printf(”duration  float, \n  ”); 


printf(”resolution  integer);\n\n”); 

}  /*  End  of  if  else  */ 

...,.CREATE  MEdia  TABLE  IN  INGRES  START  HERE*********************/ 
..THE  INGRES  FUNCTION  CALLS  WRITE  MANULLY**'************’*****/ 
/*  #  line  1046  "db.sc”  */  /*  create  table  */ 

{ 

printf("\nCREATING  MEDIA  TABLE  NOW.  PLEASE  WAlT!!\n"); 

Ilsqlnit(&sqlca); 

IIwritedb(”create  ”); 

IIwritedb(media_name); 

IIwritedb(”(”); 

if  (strcmp(dala_type,  "image”)  ==  0) 

{ 

IIwritedb(”i_id=i4,f_id=c64,descrp=text(500),”);/*  vchar(500)  */ 
IIwritedb("height=i4,width=i4,depth=i4)"); 
printf(”\nCREATE  AN  IMAGE  TABLE  COMPLETE!  !\n”); 

} 

else 

{ 

IIwritedb(”s_id=i4,f_id“c64,descrp=rtext(500),”);  /*  vchar(500)  */ 
IIwritedb(”size=i4,samp_rale=i4,en<:oding=i4,”); 

IIwritedb(”duralion=f4^esolution=i4)”); 
printf(”\nCREATE  A  SOUND  TABLE  COMPLETE! !\n”); 

}  /*  End  of  if  else  */ 

IIsqSync(0,&sqlca); 

} 

/*  #  line  1 068  ”db.sc”  */  /*  host  code  */ 

. . ******** *creaTE  MEDIA  TABLE  IN  INGRES  STOP  HERE**********************/ 

while  ((c  =  getcharO)  !=  Vi’) 

}  /*  End  of  for  loop  *7 
}  /*  End  of  ql_create_media_table{)  */ 

/••***»***•*****»********••**«****«*•**•*»***•*»**»***•**»**»***************/ 


/*  Translate  SQL  statement  to  create  a  STANDARD  relation  */ 

/**•*«* . . . **** . **** . 


void  ql_create_table() 

{ 

int  i  =  0, 
entry  =  0, 
count  =  0; 

act_media_count  =  0; 

entry  =  table_array(table_list[table_cursor]].att_entry; 
count  =  table_array[table_list[table_cursor]].att_count; 
printf(”\nSQL  statement ::\n”); 
printff”  create  table  %12s  (”, 

table_array[table_listItable_cursor]).table_name); 
for  (i  =  1;  i  <  count;  i  +  +  ) 

( 

printf("%s  ”,  att_array[entry].att_name); 
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strcpy(data_type,  aa_array[entry].data_type); 
if  ((strcmp(data_type,  "image")  =  0)  II 

(strcmp(data_type,  "sound")  =  0)) 

( 

printf("integer,^i"); 

act_media_list[act_media_count]  =  entry; 
act_media_count  ++; 

} 

else 

printf("%s,Vi",  att_array  [entry],  datatype); 
printf("  "); 

entry  =  att_array  [entry]  ,next_index; 

}  /*  End  of  for  loop  i  */ 
printf(”%s  " .att^array [entry ] ,att_name); 
strcpy(data_type,  att_array[entry].data_type); 
if  ((strcmp(data_type,  "image")  =  0)  II 

(strcmp(data_type,  "sound")  =  0)) 

l 

printf("integer);Vi\n"); 
acLmedia_list[act_media_count]  =  entry; 
act_media_count  ++; 

) 

else 

printf("%s);\n\n",  att_arTay  [entry  ].data_type); 

/********,*****, *CREATE  STD  XABLE  IN  INGRES  START  HERE**********************/ 
/************THE  INGRES  FUNCTION  CALLS  WRITTEN  MANULLY**********»********/ 
entry  =  table_array[table_list[table_cursor]].att_entry; 
count  =  table_array[table_list[table_cursor]].att_count; 

/*  #  line  1 120  "db.sc"  */  /*  create  table  */ 

{ 

printf('ViCREATING  STD  TABLE  NOW.  PLEASE  WAIT!!\n"); 

Ilsqlnit(&sqlca); 

IlwritedbCcreate "); 

IIwritedb(table_array[table_list[table_cursor]].tabie_name); 

IIwritedb("("); 

for  (i  =  1;  i  <  count;  i++) 

( 

IIwriledb(att_array[entry]att_namc); 

Ilwritedb("="); 

strcpy(data_type,  au_array[entry].data_typc); 
if  ((strcmp(data_type,  "image")  =  0)  II 

(sircmp(daU!_type,  "sound")  ==  0)  II 

(strcmp(data_type,  "integer")  =  0)) 

IIwritedb(  i4,"); 
else 

if  (strcmp(data_type,  "float")  =  0) 

IIwritedb("f4,"); 

else 

[  /*  char  data_type  */ 

IIwritcdb(att_array[entry].data_type); 

IlwritcdbC","); 

) 

entry  =  att_array[entry].next_indcx; 

)  /*  End  of  for  loop  i  */ 

IIwritedb(att_an-ay[entry].att_namc); 
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IIwritedb(”="); 

strcpy(data_type,  att_array[  entry  ]  .data_type ); 
if  ((strcmp(data_type,  "image”)  ==  0)  || 

(strcmp(data_type,  "sound”)  ==  0)  I! 

(strcmp(data_type,  "integer”)  ==  0)) 
IIwritedb(”i4)”);  /*  Integer  type  V 

else 

if  (strcmp{data_type,  "float”)  ==  0)  /*  Float  type  */ 

IIwritedb(”f4)”X 

else 

{  /*  char  20  type  */ 

IIwTitedb(att_array[entjy].data_type); 

DwritedM”)”); 

} 

IIsqSync(0,&sqlca); 

printf(”\nCREATE  A  STD  TABLE  COMPLETE! !\n”); 

} 

/*  #  line  1164  "db.sc”  */  /*  host  code  */ 


/***••*** ********CREATE  STD  TABLE  IN  INGRES  STOP  HERE 


/ 


while  ((c  =  getcharO)  !=  Vi’) 


if  (act_media_count  >  0) 
ql_create_media_table(); 

}  /*  End  of  ql_create  table<)  * 

/*  Print  out  the  table  catalog  information  on  screen  */ 

void  print_all_table() 

{ 


int  i  =  0  ; 

printfCM* ‘Table  Name“\n”); 
for  (i  =  0;  i  <  table_count;  i+  +  ) 

{ 

printf(”\t  %s\n”,table_array[table_list[i]].table_name); 
if  (0  %  15)==  14) 

{ 

printf("\n*RETURN  TO  CONTINUE*^”); 
while  <(c  =  getcharO)  !=  ’W) 

printf(’\t“Table  Name“\n”); 

} 

}  /*  End  of  for  loop  */ 

}  /*  End  of  print  all  tableO  */ 

/*  Get  a  INTEGER  value  of  a  standard  attribute  from  the  user  input  */ 

. . . . . . . . . . 

void  get_int_value() 

{ 

char  stuffl  3];  /*  To  provide  a  dummy  var  for  ’\n’  when  user  enter  ’?'  */ 
i_value[i_index)  =  0; 
scanf(”%d”,  &i_value(i_indexj); 
if  (i_value[i_index]  ==  0)  /*  9  or  0  entered  */ 
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{ 

i_value[i_index  1  =  0;  /*  if  0  entered  still  0  */ 

stufflO]  =  NO’; 

gets(stuff);  /*  To  let  next  gets()  work  when  ?  entered  in  scanf()  */ 

} 

else 

getcharO;  f*  Add  after  scanfO  to  let  next  gets()  work  properly  */ 


att_array[att_cursor].value_entiy  =  i_index; 
i_index  =  (i_index  +  1 )  %  20; 

}  /*  End  of  get_int_value()  */ 

/******* . * . ****** . . . * . **/ 

/*  Get  a  FLOAT  value  of  a  standard  attribute  from  the  user  input  */ 

. . . . . . . 

void  getJloat_value() 

{ 


char  stuff]3];  /*  To  provide  a  dummy  var  for  Nn’  when  user  enter  ’?’  */ 

f_value[f Jndex]  =  0.0; 

scanf(”%F,  &f_value[f_indexj); 

if  (f_value[f Jndex]  ==  0.0)  /*  ?  or  0  entered  */ 

< 

f_value[f_index]  =  0.0;  /*  if  0  entered  still  0.0  */ 

stufflO]  =  NO’; 

gets( stuff);  /*  To  let  next  getsO  work  when  ?  entered  in  scanfO  */ 

I 

else 

getcharO;  /*  Add  after  scanfO  to  let  next  getsO  work  properly  */ 
att_array[att_cursor].value_entry  =  f_index; 
f_index  =  (fjndex  +  1 )  %  20; 

}  /*  End  of  get_float_value()  */ 

/ft**************************************************************************/ 


/*  Get  a  STRING  value  of  a  standard  attribute  from  the  user  input  */ 

/ . . . . . . . .*.....*..*.*****../ 

void  get_c20_valueO 
{ 

int  over_length  =  TRUE;  /*  Initialize  to  true  */ 


char  c_temp[60];  /*  Temp  var  for  read  in,  60  to  avoid  bus  error  */ 
while  (overjength) 

{ 

c_temp[0]  =  NO'; 

gets(c_temp); 

if  (strlen(c_temp)  >=  21) 

< 

printfCNnSorry!!  Value  OVER  20  characters!”); 
putchar(N007’); 

printf(”\nPlease  Enter  «%s»  Value  (  ?  if  unknow)::  ”, 

datatype); 

} 

else 

{ 

overjength  =  FALSE; 
strcpy(c_value[c  Jndex],  cjemp); 
if  (strcmp(c_value[c Jndex],  ”?”)  ==  0) 
strcpy(c_value(c Jndex],  ”  ”);  /*  Assign  blank  as  null  */ 
att_array[att_cursor].value_entry  =  cjndex; 
c Jndex  =  (cjndex  +  1 )  %  20; 
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}  /*  End  of  if  else  */ 

}  /*  End  of  while  (overjength)  */ 

}  /*  End  of  get_c20_value()  */ 

/***«**************************** ****************************** ****** *******/ 


/*  Get  the  description  of  a  MEDIA  attribute  from  the  user  input  */ 

. . . . **************** . ***************** . . 

void  get_descrpO 
{ 


char  phraselMAX_PHRASE+20j;  /*  Maximum  length  of  a  phrase  is  127  */ 
int  phrase_len  =  0,  /*  Declared  20  char  more  to  avoid  the*/ 

descrpjen  =  0;  /*  bus  error!  */ 

int  stop_input  =  FALSE; 
descrpfoj  =  \0’; 

printf(”\nPlease  Enter  Description:”); 

printf(”\nNOTE:  One  phrase  per  line.  End  with  an  empty  line::\n”); 
while  (!stop_input) 

{ 

phrase[0]  =  *\0’; 
gets(phrase); 

phrasejen  =  strlen(phrase); 
if  (phrasejen  >=  1 ) 

{ 

if  (phrasejen  >=  MAXJPHRASE)  /‘Need  end  with  \n  &  \0  in  one  phrase*/ 

{ 

printf(AnThe  phrase  OVER  %d  characters!”,  (MAX_PHRASE  -  1 )); 

printf(”\nlnvalid  input!!  TRY  AGAIN! !\n”); 

putchar(\007’); 

} 

else 

{ 

phraselphrase  len]  =  V’; 
phrase  [phrase_len  +  1  ]  =  \Q'\ 
if  (phrasejen  >  1 ) 

{ 

if  ((descrpjen  +  phrasejen  +  1)  >=  (MAXJDESCRP  +1)) 

{ 

stop  input  =  TRUE; 

printf(”\nThe  last  phrase  extended  beyond  the  maximum  %d  ”, 

MAXJDESCRP); 

printf(”\ncharacters  in  description.  It  has  been  canceled !\n”); 
putchar(\007’); 
while  ((c  =  getcharO)  !=  ’\n’) 

> 

} 

else 

{ 

strceKdescrp.  phrase); 

descrp_len  =  descrp_len  +  phrase_len  +  1; 

}  /*  End  of  if  else  */ 

} ;  /*  End  of  if  (phrase  Jen  >  1 )  */ 

}  /*  End  of  if  else  (phrasejen  >=  MAX_PHRASE)  */ 

}  /*  E,.d  of  if  (phrasejen  >=  1)  */ 
else  /*  Empty  string  input  */ 

{ 

if  (descrpjen  ==  0) 
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( 

printf  (An  Sorry!  Empty  string  is  NOT  allowed  !!\n”); 
putchar(’\00T); 

} 

else 

stop_input  =  TRUE; 

}  /*  End  of  if  else  */ 

}  /*  End  of  wiiile  (!stop_input)  */ 

}  /*  End  of  get_descrp()  */ 

. . . . . . . . . . 

/*  Display  the  IMAGE  by  passing  pixels  and  colormap  from  the  caller.  */ 

/*  It  open  another  process  in  SUN  environment  to  display  the  image  on  the  */ 

/*  screen.  It  might  be  able  to  quit  the  image  automatically  before  display  */ 

/*  the  next  image.  */ 

/******#•*********#*********************«••****•****************************/ 
show_image(pixels,  colormap) 
struct  pixrect  ‘pixels; 
colormap_t  ‘colormap; 

{ 

char  answer; 
int  i,  error,  pid; 

Frame  frame; 

Canvas  canvas; 

Pixwin  *pw; 
pid  =  fork  (); 
if  (pid  ^  0) 

{ 

printf  ("Starting  display  process  failed\n\n"); 
return  (- 1 ); 

} 

if  (pid  >  0)  { 

return  (pid); 

} 

if  (colormap  ==  NULL) 

{ 

printf  ("Cannot  show  it  -  no  colormap.\n\n”); 
exit  (1); 

} 

frame  =  window  create  (NULL,  FRAME, 

FRAM  E_LAB  EL,  "IMAGE”, 

FRAMEJMO  CONFIRM,  TRUE, 

WIN_WIDTH,  pixels->pr_size.x  +  20, 

WIN_HEIGHT,  pixels->pr_size.y  +  50, 

WIN_ERROR_MSG,  "Cannot  create  window.”, 

0); 

if  (frame  ==  NULL) 

{ 

printf  ("Cannot  create  frame\n\n"); 
exit  (1); 

); 

canvas  =  window_create  (frame,  CANVAS, 

WIN_WTDTH,  pixels->pr_size.x, 

WIN_HEIGHT,  pixels->pr_size.y, 

0); 

if  (canvas  ==  NULL) 
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{ 

printf  v  Cannot  create  canvas\n\n”); 
exit  (1); 

}; 

pw  =  canvas_pixwin  (canvas); 
if  (pw  ==  NULL) 

{ 

printf(”pixwin  is  NULL\n\n”); 
exit  (1); 

) 

window_fit  (frame); 

if  (co!ormap->type  ==  RMT_EQUAL_RGB  &&  colormap->length  >  0) 

{ 

pw_setcmsname(pw,  ”phct~”); 

if  (error  =  pw_putcolormap(pw,  0,  colormap->length, 

colormap->map[0], 
colormap->map[  1 ), 
colormap- >  map  [  2  ] )) 

{ 

printf  ("Cannot  load  colormapAn”); 

printf  ("error  code  =  %d\n”,  error); 

printf  ("type  =  %d\nlength  =  %d\n",  co!ormap->type, 

colormap->length); 

exit  (1); 

}; 

} 

else 

{ 

printf  ("Cannot  show  photo  -  colormap  not  appropriate.\n\n”); 
exit  (1); 

} 

if  (pw_write  (pw,  0,  0,  pixels->pr_size.x,  pixels->pr_size.y, 

PIX_SRC,  pixels,  0,  0)) 

printf  ("Cannot  display  image  on  screen .\n\n”); 
else 

window_main_loop(frame); 
wi  ndo w_destroy(  frame  , 
pr_destroy(pixels); 
exit  (0); 
return  (0); 

}  /*  End  of  show_image(pixels,  colormap)  V 

/*  Get  a  IMAGE  value  of  a  media  attribute  from  the  user  input  */ 

/ft**************************************************************************/ 

void  get_image_value() 

{ 

STR_path  file_name; 

STR_descrp  nothing; 

char  temp_file(  100J;  /*  Declare  more  to  avoid  bus  error  */ 
int  height  =  0, 
width  =  0, 
depth  =  0; 
struct  pixrect  *pr; 
colormap_t  cm; 
int  show_pid,  wait_pid; 
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union  wait  status; 

int  over_length  =  TRUE;  /*  Initialize  to  true  */ 

cm. type  =  RMT_NONE;  /*  this  is  absolutely  necessary!  Otherwise  */ 

cm.length  -  0;  /*  pr_load_colormap  might  not  allocate  storage  */ 

cm.map[0]  =  NULL;  /*  for  the  colormap,  if  the  garbage  found  in  */ 

cm.mapf  1  ]  -  NULL;  /*  the  cm  structure  seems  to  make  sense.  The  */ 

cm. map[ 2]  =  NULL;  f*  result,  of  course,  is  segmentation  fault.  */ 

img_record[imgJndex].iJd  =  att_array[att_cursor].media_id; 
while  (over_length) 

{ 

printf(”\nPlease  Enter  «%s»  File  Name!!”,  data_type); 
printfCVNOTE:  Enter  The  Full  Path  Name::  (  ?  if  unknow)\n"); 
temp_file[0j  =  NO’; 
gets(temp_file); 

if  (strlen(temp_file)  >-  (MAX_PATH  +1)) 

{ 

printf(rNn Sorry!!  PATH_NAME  OVER  %d  characters!  TRY  AGAIN! fm”, 

MAX_PATH); 

putchar(\007’); 

} 

else 

{ 

strcpy(file_name,  temp_file); 
if  (strcmp(file_name,  ”?”)  ==  0) 

{ 

overjength  =  FALSE; 
strcpy(img_reeord[img_index].fJd,  ”  ”); 
strcpy(img_record[img_index].descrp,  ”  ”); 
img_record[img  index J.height  =  height; 
img_record[img_index].  width  =  width; 
img_record[img  index l.depth  =  depth; 

} 

else 

{ 

if  ((img_file=fopen(file_name,  "r"))  ==  NULL) 

{ 

printfC\n%s”,  file_name); 

printfCNnThe  File  cannot  be  opened'  Try  Again!.'\n"): 
putcharC\007’); 

> 

else  { 

pr  =  prJoad(img_file,  icm);  /*  Get  registration  data  */ 
ISimage_from_pixrect(pr,  &cm,  nie_name,  nothing); 
if  (pr  ==  NULL) 

{ 

printf(’\n%s",  file_name); 

printf(”\nThe  File  does  not  contain  a  proper  image!”); 
printf(”\nThe  image  must  be  in  Sun  Raster  format!"); 
printf(”  Try  Again! !\n”); 
putchaH\(X)7'); 

} 

else  { 

overjength  =  FALSE; 

strcpy(img_recordlimg_index].fJd,  file_name); 
printfCNnDisplay  the  image  before  enter  the  description0"); 
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printf(”  (y/n):: "); 
if  (yes_no_answer()  ==  ’y’) 
show_image(pr,  &cm); 

img_record[img_index].height  =  pr->pr_size.y; 
img_record[img_indexl.  width  =  pr->pr_size.x; 
img_record[  Lmg_index  ]. depth  =  pr->pr_depth; 

}  /*  End  of  if  else  */ 

}  f*  End  of  if  else  */ 
fclose(img_file); 

}  /*  End  of  if  else  */ 

}  /*  End  of  if  else  V 
}  /*  End  of  while  (over_  length)  */ 

}  /*  End  of  get_image_value()  */ 

/* . . . . . . 

/*  Play  the  SOUND  before  enter  description  */ 

. . * . * . . . . 

void  play_snd() 

{ 

char  display  =  ’y’; 
while  (display  ==  V’) 

< 

play_sound(snd_record[snd_index  ].f Jd ); 

printf(”\nPIaying  sound . ”); 

while  (getcharO  !=  Vi’) 
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printfCVPlay  one  more  time?  (y/n)::”); 
display  =  yes_no_answer(), 

}; 

}  /*  End  of  play_snd()  */ 


/*  Get  a  SOUND  value  of  a  media  attribute  from  the  user  input  */ 

/ft**************************************************************************/ 


void  get_sound_value() 

{ 

STR_path  file_name; 

char  temp_file[100];  /*  Declare  more  to  avoid  bus  error  V 
int  size  =  0, 
samp_rate  =  0, 
encoding  =  0, 
resolution  =  0; 
float  duration  =  0.0; 

int  over_length  =  TRUE;  /*  Initialize  to  true  */ 
snd_record[snd_index].s_id  =  att_array(att_cursor].media_id; 
while  (over_length) 

{ 

printf(”\nPlease  Enter  «%s»  File  Name'!”,  data_type); 
printf(r\nNOTE:  Enter  The  Full  Path  Name::  (  ?  if  unknow)\n”); 
temp_fi'e[0]  =  ’\0’; 
gets(temp_file); 

if  (strlen(temp_file)  >=  (MAX_PATH  +1)) 

\ 

printfCViSony!!  PATH_NAME  OVER  %d  characters!  TRY  AGAIN!  !\n", 

MAX_PATH); 


putchar('\007’); 

} 
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else 

{ 

strcpy(file_name,  temp_file); 
if  (strcmp(file_name,  ”?”)  ==  0) 

{ 

over_length  =  FALSE; 
strcpy(snd_record[snd_index].f_id, "  ”); 
strcpy(snd_record[snd_index].descrp,  ”  ”); 
snd_record[snd_index].si2e  =  size; 
snd_record  [  sndindex  ] .  samp_rate  =  samp_rate; 
snd_record[snd_index].encoding  =  encoding; 
snd_record{snd_index].duration  =  duration; 
snd_record(snd_index].re  solution  =  resolution; 

} 

else 

{ 

if  ((snd_file  =  fopen(file_name,  ”r”))  ==  NULL) 

{ 

printf(”\n%s”,  file_name); 

printf(”\nThe  File  cannot  be  opened!  Try  Again! !\n”); 
putchar(\007'); 

} 

else 

{ 

s_hdr.sfname[0]  =  \0'\ 

sndjoad(file.name);  /‘Get  registra  from  sound  text  file*/ 
if  (s‘-len(s_hdr.sfname)  !=  12)  /*  sfname  must  12  chars  as  */ 
1  /*  a  test  of  sound  file  */ 

printf(”\n%s”,  file_name); 

printf(”\nThe  File  does  not  contain  a  proper  sound!”); 

printf(”  Try  Again! T\n”); 

putchar(’\007’); 

} 

else  /*  i.e.  Valid  input  */ 

{ 

o\er_length  =  FALSE; 

strcpy(snd_record[snd_index].f_id,  s_hdr. sfname); 

printf(”\nPlay  the  sound  before  enter  the  description?”); 
printfC  (y/n)::”); 
if  (yes_no_answer{)  ==  ’y’) 
play_snd(); 

snd_recordtsnd_index].size  =  s_hdr.s_size; 
snd_record[snd_indexJ.samp_rate  =  s_hdr.s_samplrate; 
snd_record[snd_index].encoding  =  s_hdr.s_encoding; 
snd_record[snd_index]. duration  =  s_hdr.s_duration; 
snd_record[snd_indexj.  resolution  =  s_hdr.s_resolution; 

}  /*  End  of  if  else  */ 

}  /*  End  of  if  else  */ 
fclose(snd_file); 

}  /*•  End  of  if  else  */ 

)  /*  End  of  if  else  */ 

}  /*  End  of  while  (overjength)  */ 

}  /*  End  of  get_sound_value()  */ 


/ . . . . . . . . . . 

/*  Get  a  value  of  a  standard  attribute  from  the  user  input  */ 
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/**************••*****•*******•****************•************ **♦•**♦** *******/ 

void  get_std_value() 

{ 

printf(”\nTable  Name::  %s\nAtt  Name  ::  %s\nData  Type  ::  %s’, 
table_array[table_list[table_cursor]].table_name, 
att_arraylatt_cursor].att_name, 
att_array(att_cursor].data_type); 
printf(”\nPlease  Enter  «%s»  Value  (  ?  if  unknow)::  ”,  data_type); 
if  (strcmp(data_type,  "integer”)  ==  0) 
get_int_value();  /*  Integer  data  type  */ 

else 

if  (strcmp(data_type,  "float”)  ==  0) 
get_float  value( );  /*  Float  data  tupe  */ 

else 

get_c20_value();  /*  String  c20  data  tupe  */ 

}  f*  End  of  get_std_value()  */ 

************************************ to************************************/ 

!*  Get  a  value  of  a  media  attribute  from  the  user  input  V 

/***« ************************** *********************************************/ 

void  get_media_value() 

{ 

printf(”\nTable  Name::  %s\nAtt  Name  ::  %s\nDataType  ::  %s”, 
table_array[table_list[table_cursor]].table_name, 
attarray  [att_cursor  ]  .att_name , 
att_array  [att_cursor  ].data_type ); 

if  (strcmp(data_type,  "image”)  ==  0) 

{ 

img_value[img_index]  =  att_array[att_cursor].media_id; 
aft_array[att_cursor].value_entry  =  img_index; 
get_ image  value! );  t*  Image  data  type  V 

if  (strcmp(img_record[img  index  ].f_id,  ”  ”)  !=  0) 

{ 

printf(”\nEnter  the  description?  (y/n)::  ”); 
if  (yes_no_answer()  ==  ’y’) 
get_descrp(); 
else 

strcpy(descrp,  ”  ”); 

strcpy ( i mg_record [img_index].de scrp ,  de scrp ); 

) 

at  t  array  [  att_cursor  ] .  med  i  a  Jd + + ; 
img_index  =  (img_index  +  1)  %  20; 

} 

else 

{ 

snd_value[snd_index]  =  att_array[att_cursor].media_id; 
att_array[att_cursor].value_entry  =  snd_index; 
get_sound_value();  /*  Sound  data  tupe  */ 

if  (strcmp(snd_record[snd_index).f_id,  ”  ”)  !=  0) 

{ 

printf(”\nEnter  the  description?  (y/n)::  ”); 
if  (yes_no_answer{)  ==  ’y’) 
get_descrp(); 
else 

strcpy(descrp,  ”  ”); 

strcpy(snd_record(snd  Jndex  j.descrp,  descrp); 
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att_array  [  att_cursor  ] .  medi  a_id + + ; 
snd_index  =  (snd_index  +  1)  %  20; 
}  /*  End  of  if  else  */ 

}  /*  End  of  get_media_value()  */ 


f*  Get  the  values  of  a  tuple  from  the  user  input.  It  begin  loop  at  the  1st  */ 
f*  attribute  until  the  last  attribute  entered  */ 

/****************«******•»•*********«***********************************•***/ 
void  get_tuple_value{) 

{ 

int  i  =  0, 
count  =  0; 

count  =  table_array(table_list[table_cursor]].att_count; 
att_cursor  =  table_array[table_list[table_cursor]j.att_entry; 
act_media_count  =  0; 

for  (i  =  0;  i  <  count;  i++)  /*  Loop  to  get  value  for  each  attribute  */ 

{ 

strcpy(data_type,  att_array[att_cursor].dala_type); 
if  ((strcmp(data_type,  ’’image”)  ==  0)  || 

(strcmp(data_type,  "sound")  ==  0)) 

{ 

get  media_value(); 

act_media_listlact_media_count]  =  att_cursor;  /*  Collect  the  */ 
act_media_count+  +  ;  /*  media  indices*/ 

> 

else 

get_std_value(); 

attcursor  =  att_array[att_cursor].next_index; 

}  /*  End  of  for  loop  */ 

}  /*  End  of  get  tuple  value  */ 

,m**i 

/*  Insert  a  tuple  of  one  part'^ular  relation  */ 

. . . . . . . . . . . *V 

void  insert_tuple() 

{ 

int  table_found  =  FALSE;  /*  Initialize  to  false  */ 
while  (!tab!e_found) 

{ 

printf("\nEnter  table_name::(Maximum  1 2  characters);  (  9  for  HELPDn"); 

table_name[0]  =  *\0’; 

gets(table_name); 

if  (strlen(table_name)  >=  1 3)  /*  Over  maximum  name  length  */ 

{ 

printfC^nSorry'!  Table  Name  OVER  12  characters!”); 
putchar<\007’); 

} 

else 

{ 

if  (strcmp(table_name,  ”?”)  ==  0) 
print_al!_tableO; 
else 
{ 

strcpyftable_array[table_index).table_name,  table_name); 
table_found  =  check_table_name(); 
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if  (tabl  e_four,d) 

{ 

table_cursor  =  table_entry; 
get_tuple_value(); 

} 


else 


{ 

printf(”\nSorry!!  Table  name:  %s  NOT  found!  TRY  AGAIN!!”, 
table_array[table_index].table_name); 


putchar^OOT); 

}  /*  End  of  if  else  */ 
}  l*  End  of  if  else  */ 

}  /*  End  of  if  else  */ 

}  /*  End  of  while  (!table_found)  */ 

}  f*  End  of  insert_tuple()  V 


/*  Print  out  the  value  of  current  tuple  which  the  user  want  to  insert  */ 
/***************************«*********************************•****•+*******/ 


void  print_tuple() 
{ 


int  i  =  0, 
count  =  0, 
entry  =  0; 
clr_scr(); 

entry  =  table_array[table_list[table_cursor]].att_entry; 
coun*  =  table_array[table_list[tablc_cursor]].att_count; 
printf(”\nTable  Name::  %s\n”, 

table_array[table_list[table_cursor]].table_name); 
printf(”\nOrder  Attribute  NameXtData  Type\tValue\n”); 
for  (i  =  0;  i  <  count;  i++) 

{ 

strcpy(data_type,  att_array  [entry  ].data_type); 
if  (strcmp(data_type,  ”c20”)  ==  0) 

printf(”  %d  %13s\t%s\t\tV%s\’\n”,(i+l),  att_array[entry].att_name, 

attarray  [entry]. da  tatype, 
c_val  ue  [att_array  [entry  ]  ,value_en  try  ]) ; 

else 

if  (strcmp(data_type.  "integer”)  ==  0) 

printf(”  %d  %13s\i%s\t\t%d\n”,(i  +  l) ,  att_array [entry ].att_name, 

att_array[entry].data_tjpe, 
i_val  ue[  att_array  [entiy  j .  val  ue_entry  ]) ; 

else 

if  (strcmp(data_type,  "float”)  ==  0) 

printf(”  %d  %13s\t%s\t\t%f\n”,(i+l) ,  att_array[entry].att_name, 

att_array[entry].data_type, 
f_value[att_array  [entry  ].value_entry]); 

else 

if  (strcmp(data_type,  "image”)  ==  0) 

{ 

printf(”  %d  %13s\t%s\t\t”,(i+l) ,  att_array[entry].att_name, 

att_array  [entry  ].data_  type); 

if  (strcmp(img_record[att_array[entiy].value_entry].f  Jd,  ”  ”) 

==0) 


printf(”NO  VALUEXn”); 
else 
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printf(”HAS  VALUED”); 

} 

else 

{ 

printf(”  %d  %13s\t%s\t\t”,(i+l)  ,att_array [entry ].att_name, 

att_aiTay[entry].data_type); 

if  (strcmp(snd_record[att_array[entry  j.value_entry  ].f_id,  ”  ”) 

printf(”NO  VALUENn”); 
else 


==0) 


printf(”HAS  VALUE\n”); 

} 

entry  =  att_array[entiy].next_index; 

}  /*  End  of  for  loop  i  V 
}  /*  End  of  print_tuple()  */ 

********************* *«*****♦**************%********** ****»♦ *****«********/ 


/*  Print  out  the  description  of  media  attribute  in  current  the  tuple  */ 


void  print_media_tuple() 

{ 

Lit  i  —  0, 


entry; 

STR_name  data_type; 
printf(”\nMedia  Description  ::\n”); 
for  (i  =  0;  i  <  act_media_count;  i++) 

[ 

printf(”\nAtt_name  ::  %s”,  att  array[act_media_list[i]].att  name); 
strcpy(data_type,  att_array[act_media_list[i  ]].data_type); 
entry  =  att_arcay[act_media_list[i]].va]ue_entiy; 
if  (strcmp(data_type,  "image”)  ==  0) 

{ 

printf(”\nFile_name  ::  V%sV”,  img_record[entry).f Jd); 
printf(”VnDescription::  \n«%s»”,  img_record[entry].descrp); 


{ 

printf(”\nFile_name  ::  V%sV”,  snd_record[entry].f_id); 
printf(”\nDescription::  \n«%s»”,  snd_record[entry].descrp); 

} 

while  ((c  =  getcharO)  !=  Vi’) 


}  /*  End  of  for  loop  V 
}  /*  End  of  print_media_tuple()  */ 

/****************************************♦**********************************/ 

/*  Print  out  the  value  of  current  attribute  */ 

. . . . . . . . . . . 

void  print_valueO 

{ 

int  entry; 

entry  =  att_array[att_cursor].value_entry; 
clr_scr(); 

printf(”\nTabIe  Name::  %s”, 

table_array[table_list[table_cursor]].table_name); 
printf(”\nAtt_Name  ::  %s”,  att_array[att_cursor].att_name); 
printfC’SnData  Type  ::  %s”,  att_array[att_cursor].data_type); 
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printf("SnValue  ::  ”); 
if  (strcmp(dala_type,  ”c20”)  ==  0) 
printf(”V%sY\n”,  c_value[entryj); 
else 

if  (strcmp(data_type,  "integer”)  ==  0) 
printf(”%d\n",  i_vaiue  [entry]); 
else 

if  (strcmp(data_type,  "float”)  ==  0) 
printf(”%f'jk”,  f_va'ue  [entry  1); 

else 

if  ( strc  mp(  data_type ,  "image”)  ==  0) 

{ 

printf(”\n\t==>File_name  ::  Y%sV”,  img_record[entry].f_id); 
printf(”\n\t==>Description::  \n«%s»\n”,  img_record[entry].descrp); 

} 

else 

{ 

printf(’\n\i==>File_name  ::  V%sV”,  snd_record[entry].f Jd); 
printf(TVi\t==>Description::  \n«%s»\n",  snd  record[entry].descrp); 

) 

}  /*  End  of  print_value()  */ 

^** ***************************************************** *******«************/ 

/*  Change  the  IMAGE  values  of  current  tuple  which  the  user  want  to  insert  */ 

/***************************************************************************/ 

void  change_img_value() 

{ 

int  cursor;  /*  Previous  index  of  media  record  array  */ 
cursor  =  att_array[att_cursor].value_entry; 
img_value[img_index]  =  att_array[att_cursorl.media_id; 
att_array[att_cursor].value_entry  =  img_index; 
printf("vnChange  IMAGE  file  name?  (y/n)::  ”); 
if  (yes_no_answer()  ==  ’y’) 
get_image_value();  /*  Image  data  type  */ 
else 
{ 

img_record[img_index].i_id  =  att_array[att_cursorl.media_id; 
strcpy(img_recordlimg_index].f_id,  img_record[cursor].f_id); 
img_record[img_index].height  =  img_record[cursor  [.height; 
img  record[img_index].width  =  img_record[cursor].width; 
img_rec°rd[img_index].  depth  =  img_record[cursor]. depth; 

} 

printf(”\nChange  IMAGE  description0  (y/n)::  ”); 
if  (yes_no_answer()  ==  ’y) 

{ 

get_descrp(); 

strcpy(  i  mg_record  [img_index].descrp,de  serp ); 

} 

else 

strcpy(img_record[img_index].descrp,  img_record[cursor].descrp); 
att_array  [att_cursor  ].  media  _id+ + ; 
img_index  =  (img_index  +  1)  %  20; 

}  /*  End  of  change _img_value()  */ 

^* **************************************** **********************************/ 

/*  Change  the  SOUND  values  of  current  tuple  which  the  user  want  to  insert  */ 

/** . . . . . ***************** . **•**•**/ 


91 


void  change_snd_value{) 

{ 

int  cursor,  /*  Previous  index  of  media  record  array  */ 
cursor  =  att_array(att_cursor].va]ue_entry; 
snd_value[snd_index)  =  att_array[att_cursor].media_id; 
att_array[att_cursor].value_entry  =  snd_index; 
printf(”\nChange  SOUND  file  name?  (y/n)::  ”); 
if  (yes_no_answer()  ==  y)  >' 

get_sound_value{);  /*  Sound  data  type  */ 
else 
{ 

snd_record[snd_index].s_id  =  att_array[att_cursor].media_id; 
strcpy(snd_record[sndJndex].fJd,  snd_record[cursor].f_id); 
snd_reoord[sndJndex].size  =  snd_record[cursor].size; 
snd_record[snd_index].samp_rate  =  snd_record[cursor].samp_rate; 
snd_record[snd_index].encoding  =  snd_record[cursor]. encoding; 
snd_recond[snd_index]. duration  =  sndrecordfcursor]. duration; 
snd_record[snd_index].resolution  =  snd_record  [cursor],  resolution; 

} 

printfCVChange  SOUND  description?  (y/n)::  ”); 
if  (yes_no_answer()  ==  ’y') 

{ 

get_descrp(); 

strcpy(snd_record[snd_index].descrp,  descip); 

} 

else 

strcpy(snd_record[snd_index  l.descrp,  snd_record[cursor].descrp); 
att_array  [att_cursor  ] .  med  ia_id+ + ; 
snd_index  =  (snd_index  +  1 )  %  20; 

}  /*  End  of  change_snd_value()  */ 

/* ******* ************** ************************** ******************** ***«*#*/ 
/*  Change  the  values  of  current  tuple  which  the  user  want  to  insert  V 
/• ******************************************************** ****»*************/ 

void  modify_tuple() 

{ 

int  i  =  0, 
count  =  0, 
entry  =  0, 
order  =  0; 

char  more_change  =  ’y’; 
while  (more_change  ==  ’y’) 

{ 

print_tuple(); 

printf(”Select  the  order  which  you  want  to  change  its  value::\n”); 
printf(”Any  other  key  to  cancel  the  operation!!  Select::”); 
scanf(”%d”.  &order); 

getchar();  !*  To  let  next  getsO  work  properly  */ 
entry  =  table_array[table_list[table_cursor]].att_entry; 
count  =  table_array[table_list[table_cursor]].att_count; 
if  (1  <=  order  &&  order  <=  count) 

{ 

for  (i  =  1;  i  <  order;  i  ++) 
entry  =  att_array[entry].next_index; 

att_cursor  =  entry;  /*  Assign  the  current  index  of  att_array  */ 
strcpy(data_type,  att_array(att_cursor].data_type); 
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print_value(); 

printf(”\nPlease  Enter  «%s»  Value  (  ?  if  unknow)::  ",  data_type); 
if  (strcmp(dala_type,  "integer")  ==  0) 
get_int_value();  /*  Integer  data  type  */ 
else 

if  (strcmpf  datatype,  "float")  ==  0) 
get_float_value();  /*  Float  data  tupe  */ 
else 

if  (strcmp(data_type,  ”c20")  ==  0) 
get_c20_value();  /*  String  c20  data  tupe  */ 
else 

if  (strcmp(data_type,  "image")  ==  0) 
change_img_value(); 
else 

changesnd_value(); 

print_value(); 

} 

else 

{ 

printf(”\nSony!  You  entered  the  wrong  order!!  Please  redo  againAn”); 
putchar(\007’); 

}  /*  End  of  if  else  */ 
printf(”Any  More  Change?  (y/n)::  "); 
more_change  =  yes_no_answer(); 

}  /*  End  of  while  */ 

}  /*  End  of  modify_tuple()  */ 

^/* ********************************** A***************************************^ 

/*  Display  the  tuple  before  insertion  V 

^* ****************************************************** ********************y 

void  display_tuple() 

char  modify  =  ’y’; 
while  (modify  ==  ’y’ ) 

< 

clr_scrO; 

print_tuple(); 

while  ((c=  getchar("  !=  \n’) 

» 

if  (act_media_count  >=  1) 
prin  t_med  ia_tuple( ); 

printf(”\nAny  change  before  insert?  (y/n)::”); 
modify  =  yes_no_answer(); 
if  (modify  ==  ’y’) 
modify_tuple(); 

}  /*  End  of  while  V 
}  /*  End  of  display_info()  V 

****************************************************** ********************/ 

/*  Connect  to  parser  to  generate  the  facts  file.  We  put  all  media  descrip-  */ 

/*  tion  in  one  facts  file  ”imagei_image_  facts”  at  this  time,  it  should  be  */ 

/*  separate  later  on.  */ 

********************************************************************* *****/ 
int  connect_parseKfile_id,  new_descrp,  err_message) 

STR_path  *file_id; 
rTF._descrp  *new_descrp; 
char  "errmessage; 
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{ 

STR_path  nothing; 

STR_descrp  empty  _descrp; 
int  ISerror  =  FALSE; 
empty_descrplO]  =  NO’; 
nothinglO]  =  NO’; 

printfi’Nn  Connect  to  PARSER,  Please  Wait . \n”); 

ISerror  =  ISreplace_description(”image”,  ”i_image”,  file  .id,  empty_descrp, 
new_descrp,  nothing,  empty_descrp,  err_message); 
f*  HERE,  ISfunction  call,  Connect  to  parser  and  generate  the  */ 

/*  facts  file  in  ”imagei_image_facts”  */ 

if  (ISerror) 
retum(ISerror); 
else 

retum(FALSE); 

}  /*  End  of  connect _parser{)  */ 

. . *••******************•******•********•*****************/ 

/*  Check  the  media  description  by  connecting  to  parser  */ 

/*********************************************•*****************************/ 

int  check_media_descrp() 

{ 

int  i  =  0, 
entry; 

int  error  =  FALSE; 
char  *err  message; 

while  (i  <  act_media_count  &&  ierror) 

{ 

strcpy(data_type,  attarray  [actmediaj  ist  [  i  1  Jdatatype); 
entry  =  att_array[act_media_list[i]].value_entry; 
if  (strcmp(data_type,  "image”)  ==  0) 

{ 

if  (strcmp(img_record[entry].descrp,  ”  ”)  !=  0) 
error  =  connect_parser(img_record[entiy].f_id, 

img_record[entry].descrp,  err_message), 

} 

else 

{ 

if  (strcmp(snd_record[entry].descrp,  ”  ”)  !=  0) 
error  =  connect_parser(snd_record[entry].f_id, 

snd_record[entry].descrp,  err_message); 

} 

i++; 

} 

if  (error) 

{ 

printf(’\nThe  description  for  media  V%sV  is  NOT  acceptable!”, 
att  array[act_media_list[i-l ]].att_name); 
if  (error  ==  DESCR_WORD_ERR) 

printfC\nThe  system  cannot  understand  the  word  »%s«”,  err_message); 
else 

if  (error  ==  DESCR_STRUCTURE_ERR) 
printf(”\nThe  system  cannot  interpret  the  phase\n  >>%s«”, 

err_message); 

else 

printf(”\nThe  program  error  occur  in  pro!og!\n”); 
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printf(”\nPlease  modify  it.  Thank  you!”); 

putcharC\007’); 

while((c=getchar())  !=  *\n’) 

retum(TRUE); 

} 

else 

retum(FALSE); 

)  f*  End  of  check_media_descrp()  */ 

Translate  SQE  statement  to  insert  a  media  tuple  */ 


void  ql_insert_media_tupleO 

{ 

int  i  =  0, 
entry; 

for  (i  =  0;  i  <  act_media_count;  i++) 

{ 

strcpy(media_name,  att_array[act_media_list[ij].att_name); 
get  medianame( ) ; 

printf(”  insert  into  %  1 2s  (”,  media_name); 
strcpy(data_type,  att_array[act_media_list[i  ]].data_type); 
entry  =  att_array[act_media_list[i]J.value_entry; 
if  (strcmp(data_type,  "image”)  ==  0) 


{ 

printf(”i_id  ,\n  "); 

printf(”f_  id  ,\n  ”); 

printf(”descrp  ,\n  ”); 

printf(”height  ,\n  ”); 

printf(”width  ,\n  ”); 


printf(”depth  )\n”); 
printf(”  values!”); 

printf(”  %d  ,\n  ”, 

img_record{entry].i_id); 

printf(T%s\\\n 

i  m  g_record  [  entry  ].  f_i  d ) ; 

printf(”\’%sV,\n  ”, 

img_record[entry].descrp); 

printf(”  %d  ,\n  ”, 

img_record  [entry],  height); 

printf!”  %d  ,\n  ”, 

img_record[entry].  width); 
printf(”  %d  );\n\n”,  img_record[entry].depth); 

} 

else 

{ 

printf(”s_id  ,\n  ”); 

printf(”f_id  ,\n  ”); 

printf(”descrp  ,\n  ”); 

printf(”size  ,\n  ”); 

printf(”samp_rate,\n  ”); 

printf(”encoding  ,\n  ”); 

printf(”duration  ,\n  ”); 

printf(”resolution)\n”); 
printf!”  values  (”); 


7 
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printf(”  %d  ,\n 
printf(”Y%s\’,\n 
printf(”Y%s\\\n 
printf(”  %d  ,\n 
printf(”  %d  ,\n 
printf(”  %d  ,\n 
printf(”  %f  ,\n 


snd_record[entry].s_id); 
snd_record[entry].f_id); 
snd_record[entry].descrp); 
snd_record[entiy  ] .  size); 
snd_record[entry].samp_rate); 
snd_record[entiyJ.encoding); 


snd_record[entry].duralion); 
printft”  %d  );\n\n”,  snd__record  [entry]. resolution); 

/,*.,...l.,....,INSERXMEDIA  TUPLE  in  INGRES  START  HERE*********************/ 

/**********«****XHE  INGRES  FUNCTION  CALLS  WRITE  MANULLY*** . *************/ 

/*  #  line  2100  ”db.sc”  */  /*  insert  */ 

{ 

printfONnINSERTING  MEDIA  TUPLE  NOW.  PLEASE  WAIT!!\n"); 

Ilsqlnit(&sqlca); 

IlwritedbC’append  to  ”); 

IIwritedb(media_name); 

IIwritedb(”(”); 

if  (strcmp(data_type,  "image”)  ==  0) 

{ 

IIwritedb(”i_id=”); 

IIsetdom(  1,30,4,  &img_record[entry].i_id); 

IIwritedb(”  ,f _id=”); 

IIsetdom(  1 ,32,0,  img_record[entry J.f_id); 

IIwritedb(”  ,descrp=r); 

IIsetdom(  1 ,32,0,  img_record[entry].descrp); 

IIwritedb(”  Jieight=”); 

IIsetdom(  1 ,30,4,  &img_record[entry], height); 

IIwritedM"  ,width=”); 

IIsetdoiM  1 ,30,4,  &img_record[entry]. width); 

IIwritedM”  ,depth=”); 

IIsetdom(  1 ,30,4,  &img_record  [entry l.depth); 

IIwritedM” )”); 

printf(”\nINSERT  AN  IMAGE  TUPLE  COMPLETE  !!\n”); 

} 

else 

{ 

IIwritedb(”s_id=”); 

IIsetdom(  1 ,30,4,  &snd_record[entry].s_id); 

IIwritedM”  X_id=”); 

IIsetdom(  1 ,32,0,  snd_record[entry ].f _id); 

IIwritedM”  ,descrp=”); 

IIsetdom(  1,32,0,  snd_record[entTy].descrp); 


IIwritedM”  ,size=”»; 

IIsetdom(  1 ,30,4,  &snd_record[entry].size); 
IIwritedb(”  ,samp_rate=”); 

IIsetdom(l,30,4,  &snd_record[entiy].samp_rate); 
IIwritedM”  ,encoding=”); 
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13setdom(  1 ,30,4,  &snd_record  [entry  [.encoding); 

Hwritedbf”  ,duration=”); 

IIsetoom(  1 ,3 1 ,4,  &snd_recoTd[entry [.duration); 

Ilwritedbf”  ,resolution=”); 

IIsetdom(  1 ,30,4,  &snd_record[entry [.resolution); 
IlwritedU” )”); 

printf(”\nINSERT  A  SOUND  TUPLE  COMPLETE  !!\n”); 

} 

IIsqSync(3,&sqlca); 

} 

/*  #  line  2147  "db.sc”  */  /*  insert  */ 


MEDIA  TUPLE  IN  INGRES  STOP  HERE 


ft****************** 


/ 


while  ((c  =  getcharO) 1=  V) 


}  /*  End  of  for  loop  */ 

}  /*  End  of  ql_insei:_media_tuple()  */ 

/****************«**»**«********** *********** ************* ********** ******»«/ 

/*  Translate  SQL  statement  to  insert  a  standard  tuple  */ 

/***********«**«*****«************************************«*****************y 

void  ql_insert_tuple() 

{ 

int  i  =  0, 
count  =  0, 
entry  =  0; 
clr_scr(); 

entry  =  table_arrayltable_list[table_cursor]).att_entry; 
count  =  table_array[table_list[table_cursor]].att_count; 
printf(”\nSQL  statement  ::\n"); 
printf("  insert  into  %  1 2s  (", 

tablearray[table_list[tablecursor[].tablename); 
for  (i  =  1;  i  <  count;  i++) 

{ 

printf("%  1 2s, \n",  att  array [entry [.att  name); 
printf(”  ”); 

entry  =  att_arrayt'entryj.next_index; 

} 

printf(”%  1 2s)\n”,  att_array[entry].att_name); 
printf(”  values  (”); 

entry  =  table_array[table_list[tabIe_cursor[].att_entry; 
for  (i  =  1;  i  <  count;  i+  +  ) 

{ 

strcpy(data_type,  att_array [entry [,data_type ); 
if  (strcmp(data_type,  ”c20”)  ==  0) 

printf(T\’%sY,\n”,  c_value[att_array[entry[.value_entryj); 

else 

if  (strcmp(data_type,  "integer")  ==  0) 

printf(”  %d  ,Yn”,  i_value[att_array[entry[.value_entiyj); 

else 

if  (strcmp(data_type,  "float")  ==  0) 
printf(”  %f  ,\n",  f_va]ue{att_array[entry[.value_entry)); 
else 

if  (strcmp(data_type,  "image")  ==  0) 
printfC  %d  ,\n",  img_va]ue[att_array[entry[.value_entry[); 
else 

printf(”  %d  ,\n”,  snd_value(att_array[entry].value_entryj); 
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printf(”  ”): 

entry  =  att_array(entry].next_index; 

} 

strcpy<data_type,  att_arrayientry].dala_type); 
if  (strcmp(data_type,  ”c20")  ==  0) 

printf(’\’%s\’);\n\n",  c_value(att_array[entry].value_entry]); 
else 

if  (strcmp(data_type,  ’’integer”)  ==  0) 
printff”  %d  );\n\n",  i_value[att_an  ay  (entry  ].value_entry]); 
else 

if  (strcmp(data_type,  "float”)  ==  0) 
printK”  %f  );\n\n”,  f_value{att_arraylentry].value_entry]); 
else 

if  (strcmp(data_type,  "image”)  ==  0) 

printf(”  %d  );\n\n”,  img_value[att_array[entry].value_entry]); 

el  •' 


printf(”  %d  );\nVT,  snd_value[att_array[entry].value_entry]); 


. . .........]N’SERT  STD  TUPLE  IN  INGRES  START  HERE 


/ 


/****»****••»**» 


THE  INGRES  FUNCTION  CALLS  WRITE  MANULLY 


entry  =  table_array[table_list[table_cursor]].att_entry; 
count  =  table_array[iable_list[table_cursor]].att_count, 

/*#  line  2213  "db.sc”  */  /*  insert  */ 

{ 

printf(”\nINSERTING  STD  TUPLE  NOW.  PLEaSE  WAIT!!\n”); 
Ilsqlnit(&sqlca); 

IIwritedb(  "append  to  ”); 

II writedb( table  array [table_list[table  cursor] ].table_name); 

IlwritedbCU); 

for  (i  =  1;  i  <  count;  i+  +  ) 

{ 

IIwritedb(att_arraj  [entry].  ait_name); 

IIwritedb(”=”); 

strcpy(datatype,  att_array  [entry  ].data_type); 
if  (strcmp(data_type,  "c20")  ==  0) 

II  setdom(  1,32,0,  c_value[att_array[entiy].value_entry]); 

else 

if  (strcmp(data_type,  "integer”)  ==  0) 

IIsetdom(  1 ,30,4,  &i_valje[aU_array[entiy].value_entry]); 

else 


if  (strcmp(data_type,  "float”)  ==  0) 

IIsetdom(l,31,4,  &f_value(att_array[entryj.value_  atiy]); 
else 

if  (strcmp(data_type,  "image”)  ==  0) 

Ilsetdom! 1 ,30,4,  &img_value[att_array[entry].value_entry]); 
else 

IIsetdom(l,30,4,  &snd_value[att_array(entry].value_entry]); 
IIwritedb(”  ,”); 

entry  =  att_array[entry].next_index; 

} 

IIwritedb(att_array(entry].att_name); 

IIwritedb(”=”); 

strcpyfdata_type,  att_array[entry].data_type); 
if  (strcmp(data_type,  ”c20”)  ==  0) 

IIsetdom(  1,32,0,  c_value(att_array(entry].value_entry]); 

else 
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if  (strcmp(data_type,  "integer”)  =»  0) 

IIsetdom(  1 ,30,4,  &i_value[att_array[entryl.value_entry  ]); 
else 

if  (strcmp(data_type,  "float")  ==  0) 

Dsetdom(l,31 ,4,  &f_vaJueIaft_array|entry].value_entiy]); 
else 

if  (strcmp(data_type,  "image”)  ==  0) 

Hsetdom(  1,30,4,  &img_value[att_array[entry].value_entry]); 

else 

IIsetdom(  1 ,30,4,  &snd_value[att_array[entry], value_entry]); 

Ilwritedb(” )"); 
llsqSync(3,&sqlca); 

printf(AnINSERT  A  STD  TUPLE  COMPLETE!  ’\n”); 

} 

/*  #  line  2261  "db.sc”  */  /*  insert  */ 

. . .........insert  STD  TUPLE  IN  INGRES  STOP  HERE . 

while  ((c  =  getcharO)  !=  Vi’) 

if  (act_media_count  >=  1) 
ql_insert_media_tuple( ); 

)  /*  End  of  ql_insert_tuple()  V 

/******** ************** ******************  ********************  **************/ 
/*  Begin  for  retrieve  */ 

/*«»**• .**..***»/ 

I*  Procedure  initialize  the  array  to  empty  */ 

/*  Initialize  all  parameters  used  in  the  retrieve  to  null  */ 

void  initO 

{ 

int  ij; 
icond  -0; 
gcond=0; 

for  (i=0;i<10;i  +  +  )  { 

for  (j=0  j  <  13;j  +  +  )  { 

satiiil.t_name[j]  =0; 
satt[i].a_name(j]  =0; 
stab['!  tnamefjj  =0; 
att[i][j]=0; 
tab(i)(j]=0; 

} 

for  (j=0j<100;j++)  { 
con[i][j]='0'; 

} 

) 

} 

/*  This  procedure  get  the  table  name,  attribute  name  of  that  table  */ 

/*  and  then  return  the  attribute  type  to  the  user  */ 

/« ««««**«. ««>«««« ««*.»*•« «.»v« ........................................ *««««/ 

getatttype(tab_name  ,att_name  ,att_type ) 

STR_name  tab  name. 

STR_name  att_..ame; 

STR_name  att  type; 

( 

int  ij.k, found, count; 
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found  =  0; 

for  (i=0;i  <  table_count;i++)  { 

if  ( strcmpKtable  array  [  i  ] .  table_name ,  ;ab_ni^ne)==0 )  { 
j  =  table_array[i].att_entry; 
count  =  table_array[i].att_count; 
i  =  IGOu; 

} 

} 

for  (  k=0;k  <  count;k++)  { 

if  (strcmp(art_array [j  l.att  name,  att_name)==0)  { 
strcpyf  att_type  ,att_array  (j  ]  .data_type ) ; 

/*  For  test  only  V 

printf(An%sAatt_array[ji.att_name); 
printf(  At  %  s\n  ”,att_type ); 
found  =  1; 
k  =  1000; 

} 

j  =  att_array[j].next_index; 

} 

} 

«.«**.»*»»****»**»*»**» *»«»»****«•***•****«*»»**************»»»***»**»»**/ 

/*  procedure  search  media  attribute  search  for  the  media  attribute  in  the  */ 

/*  Relation  ana  return  m_att  to  caller  */ 

/*** .*.***.****»*************»*-«********»****«******* ****»********»**»****/ 

void  search_media_att  (m_att) 

ST  R_name  m_att; 

{ 

int  j; 

for  (j=0J<numcon  j++)  { 
if  (contype[j]==l)  { 

strcpy(m_att,att[jl); 

} 

if  (contype[j]==2)  { 

strcpy(m_att,att[j  ]); 

} 

1 

} 

/*«**********«****»***•**»**•*******»**************************»***********/ 
/*  procedure  to  process  the  image  condition  */ 

/*  put  the  result  in  the  media  tale  [number  condition]  for  process  later  */ 

/**•.*«•*•*••••••••*••**»••••«••••*••••*••••*•*«••*•*••*****••*•*•••*****•*/ 

void  process  Ja>n2(query_phrase, number) 
char  query _phrase[DESCRLEN  + 1  ]; 
int  number; 

{ 

int  id; 

char  answer,  repeat,  yes_no_answer  0,con_number; 

int  i,  query _err,  query _len,  in_Ien,  f_flag, found; 

struct  pixrect  *pr; 

colormap_t  cm; 

char  descr[DESCRLEN+ 1  ]; 

int  show_pid,  wait_pid; 

union  wait  status, 

int  imageno, 

printf  (AnEntering  RETRIEVE  ..An”); 
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cm. type  =  RMT_NONE; 
cm.length  =  0; 
cm.maptO]  =  NULL; 
cm.map[  1  ]  =  NULL; 
cm.map[2]  =  NULL; 

/*  this  is  absolutely  necessary! !!!  Otherwise  pr_load_colormap  might 
not  allocate  storage  for  the  colormap,  if  the  garbage  found  in 
the  cm  structure  seems  to  make  sense.  The  result,  of  course,  is 
segmentation  fault.  This  bug  was  very  hard  to  find.  */ 

{ 

/*  #  line  1 93  ”p2.sc”  */  /*  create  table  */ 

< 

Ilsqlnit((char  *)0); 

II  writedb(  "create  m”); 

IIwritedb(”(i_id=i4)”); 

IIsqSync<0,(char  *)<)); 

} 

/*  #  line  1 94  ”p2.sc”  */  /*  host  code  V 

printf("The  query  description  now  is:\n»%s<<\n\n”, query _phrase); 

printf  ("Searching . \n”); 

/*  exec  sql  declare  cl  cursor  for 

select  i_id,  PIXRECT  (i_image),  COLORMAP  (i_image), 

DESCRIPTION  (ijmage) 
from  emp_imgl 

where  SHOWS  (ijmage,  query_phrase); 

The  statement  is  deleted  by  the  preprocessor. 

However,  the  output  functions  and  the  selection  conditions 
associated  with  the  cursor  cl  will  be  used  later. 

The  following  declarations  are  generated:  */ 

{ 

int  ISerrorcl; 

char  ISerrmccl  [ERRMLEN+ 1  ]; 
char  ISfncKFILENAMELEN  +  1); 
char  ISdescrc  1  [DESCRLEN  +  11; 
sqlca.sqlcode  =  0; 

ISerrmccl  [0]  =  \0'; 

/*  exec  sql  open  cl;*/ 

/*  exec  sql  whenever  not  found  go  to  closec  1 ;  */ 

/*  translated  by  preprocessor  into:  */ 

if  ( ISerrorcl  =  ISshows_open(”image".”i_image",ISfncl,query_phrase.ISerrmccl) ) 

{ 

sqlca.sqlcode  =  ISerrorcl; 

if  (  sqlca.sqlcode  -=  QUERY_WORD_ERR  || 

sqlca-sqlcode  ==  QUERY. STRUCTURE_ERR  ) 
strcpy(sqlca.sqlemT!  .sqlerrmc,lSerrmcc  1 ); 

} 

/*  end  of  preprocessor  output  for  open  c  1  */ 
if  (  Isqlca.sqlcode  ) 

{ 

f.flag  =  0; 
for  (;;) 

{ 

/*  exec  sql  fetch  cl 

into  :imageno,  :pr,  :cm,  :descr; 

This  is  translated  by  the  preprocessor  into:  */ 
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if  ( ISerrorcl  =  ISshows_fetch(”image”,”i_image”,ISfncl,query_phrase,ISerrmccl ) ) 
sqlca.sqlcode  =  iserrorcl; 
if  (  sqlca.sqlcode  ==  NOT_FOUND  ) 
goto  closec  1 ; 
f_flag  =  1 ; 
if  (  Isqlca.sqlcode  ) 

{ 

/*#  line  653  "pl.sc”  */  /*  select*/ 

strcpy  (table_array[table_index].table_name,  tab[number]); 
found  =■  check_table_name(); 
table_cursor  =  table_entry; 
strcpy(media_name,att[number]); 
get  jmedia _name( ); 
printf(”%s”,media_name); 

{ 

Ilsqlnit(&sqlca); 

IIwritedb(”retrieve(imageno=”); 

IIwritedb(media_name); 

Hwritedb(”.iJd,rSdescrc  1  =”); 

IIwritedb(medianame); 

IIwritedbO\descrp)w’'); 
nwritedWTiere  ”); 

II  wri  tedbfmedi  a_name ); 
nwritedb(”.f_id=”); 

IIsetdom(  1 ,32,0,ISfnc  1 ); 

IIwritedK"  ”); 

IIsqRinit(&sqIca); 
if  (IlerrtestO  ==  0)  { 
if  (IlnextgetO  !=  0)  { 

IIretdom(  1 ,30,4,&imageno); 

Ilretdomf  1 ,32,0,ISdescrc  1 ); 

}  /*  Ilnextget  */ 

IIsqFIush(&sqlca); 

}  /*  Ilerrtest  */ 

} 

/*  #  line  657  "pl.sc”  */  /*  host  code  */ 

if  (Isqlca.sqlcode) 

{ 

if  (KiSerrorcl  =  ISpixrect  (ISfncl,  ISdescrcl,  &pr))) 
if  (KiSerrorcl  =  IScolormap  (ISfncl,  ISdescrcl,  &cm))) 

ISerrorcl  =  ISdcscription  (ISfncl,  ISdescrcl,  descr); 
sqlca.solcode  =  ISerrorcl; 

} 

else 

sqlca.sqlcode  =  PROGRAM_ERR; 

} 

/*  end  of  preprocessor  output  for  fetch  c  1  */ 
if  (sqlca.sqlcode) 
goto  closec  1 ; 
id  =  imageno; 

/*  #  line  270  ”p2.sc”  */  /*  insert  */ 

{ 

Ilsqlnit((char  *)0); 

IIwritedb(”append  to  m"); 

Dwritedb(”(i_id=’’); 
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IIsetdom(  1 ,30,4,&id); 

IIwritedb(” )”); 

!IsqSync(3,(char  *)0); 

} 

/*  #  line  272  ”p2.sc”  */  f*  host  code  */ 

}  t*  end  for  loop  of  cursor  cl  */ 
closed: 

/*  exec  sq!  close  cl;  */ 

/*  translated  by  the  preprocessor  into:  */ 

sqlca.sqlcode  =  ISshows_close(”image”,”i_image,',ISfnel , query  _phrase,ISerrmccl); 

/*  #  line  693  "pl.sc”  */  /*  host  code  */ 

}  /*  end  of  successful  open  cl ;  correct  query  description  */ 

}  /*  end  of  preprocessor  declaration  block  */ 

if  ( sqlca-sqlcode  ==  QUERY_WORD_ERR  ) 

{ 

printfOThe  system  cannot  understand  the  word  >>%s«'ui",sqlca.sq’emn.sqlerrmc); 
query_err  =  1; 

} 

if  (  sqlca.sqlcode  ==  QUERY_STRUCTURE_ERR  ) 

{ 

printfOThe  system  cannot  interpret  the  phrase\n»\n%s<<\n",sqlca.sqlerrm.sqlerrrnc) 
query_err  =  1 ; 

} 

if  ( query_err ) 

{ 

} 

} 

if  (  Ifjlag  ) 

printfOThere  are  no  media  matching  that  query  description.\n”); 
if  ( sqlca.sqlcode  ) 

printf(”An  error  has  occured  while  accessing  the  database\n\ 
sql  error  code:  %d\n”,  sqlca.sqlcode); 
clr_scr{); 

}  /*  end  of  retrieve_photo  ()  */ 

j* ***»«*»*********«»*«*»******«»*»•»»*••****» ******************** ***y 

/*  present  photo  the  the  user  present  number  and  description  too  */ 

/•••I****************************************************************/ 

present_photo  (number,  pixels,  colormap,  description) 

int  number; 

struct  pixrect  ‘pixels; 

colormap_t  ‘colormap; 

char  ‘description; 

{ 

char  answer,  yes_no_answer  (); 
int  i,  error,  pid; 

Frame  frame; 

Canvas  canvas; 

Pixwin  *pw; 

printf  ("uiThe  following  photo  has  been  found:\n\n”); 
printf  ("Number:  %d\n”,  number); 
printf  ("Description:\n»%s«\n\nT\  description); 
printf  ("Do  you  want  to  see  the  photo?  ”); 
answer  =  yes_no_answer  (); 
if  (answer  ==  ’n’) 
return  (0); 
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else  { 

pid  =  fork  (); 
if  (pid  <  0)  { 

printf  ("Starting  display  process  failedVAn”); 
return  (-1); 

} 

if  (pid  >  0)  /*  this  is  parent  process  */ 
return  (pid); 

if  (colormap  ==  NULL)  { 
printf  ("Cannot  show  it  -  no  colormap.\n\n”); 
exit  (1); 

} 

frame  =  window_create  (NULL,  FRAME, 

FRAME_LABEL,  "IMAGE", 

FRAME_NO_CONFIRM,  TRUE, 

WIN_WIDTH,  pixels->pr_size.x  +  20, 

WIN.HEIGHT,  pixels->pr_size.y  +  50, 

WlN_ERROR_MSG,  "Cannot  create  window.”, 

0); 

if  (frame  ==  NULL)  { 
printf  ("Cannot  create  frame\n\n"); 
exit  (1); 

} 

canvas  =  windowcreate  (frame,  CANVAS, 

WIN_WIDTH,  pixels->pr_size.x, 

WIN_HEIGHT,  pixels->pr_size.y, 

0); 

if  (canvas  ==  NULL)  { 
printf  ("Cannot  create  canvas\n\n”); 
exit  (1); 

} 

pw  =  canvas_pixwin  (canvas); 
if  (pw  ==  NULL)  { 
printf  ("pixwin  is  NULL\n\n”); 
exit  (1); 

} 

window  fit  (frame); 

if  (colormap->type  ==  RMT_EQUAL_RGB 
&&  colormap->length  >  0)  { 
pw_setcmsname  (pw,  "photo”); 
if  (error  =  pw_putcolormap  (pw,  0,  colormap->length, 

colormap->map[0],  colormap->map[l],  colormap->map[2]))  { 
printf  ("Cannot  load  colormap.Nn”); 
printf  ("error  code  =  %<f\n”,  error); 

printf  ("type  =  %d\nlength  =  %d\n”,  colormap->type,  colormap->length); 

/*  for  (i  =  0;  i  <  colormap->length;  i+  +  )  { 

printf  (”  %x  %x  %x\n”,  *(colormap->map[0]  +  i), 

*(colormap->map[ll  +  i),  *(colormap->map[2]  +  i)); 

}  */ 

exit  (1); 

} 

} 

else  { 

printf  ("Cannot  show  photo  -  colormap  not  appropriate.\n\n”); 
exit  (1); 
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} 

if  (pw_write  (pw,  0,  0,  pixels->pr_size.x,  ptxels->pr_size.y, 

PIX.SRC, 
pixels,  0,  0)) 

printf  ("Cannot  write  image  to  screen.\n\n”); 
else 

window_main_loop  (frame); 
window_destroy  (frame); 
exit  (0); 

}  /*  of  (answer  =  y),  showing  the  photo  */ 
return  (0); 

} 

. . . . 

/*  This  procedure  search  through  the  media  relation  and  get  the  */ 

/*  file  name  that  match  with  the  result  table  and  send  to  the  */ 

/*  present  photo  procedure  */ 

. . 

display  _photo  (imageno,tupleno) 
int  imageno; 
int  tupieno; 

{ 

char  answer,  repeat,  yes_no_answer  (); 
char  query_phrase[DESCRLEN+ 1  ], 
in_phrase[DESCRLEN  + 1  ]; 

int  i=0j=0,  k,  c,  pid,  queryerr,  query_len,  injen,  f_flag,look_more=0; 
struct  pixrect  *pr; 
colormap J  cm; 

char  ISfnl  [FILENAMELEN+ 1 J; 
char  descrlDESCRLEN  + 1 ); 
int  show_pid,  wait_pid; 
int  ISerror, 

STR_path  file_name; 
char  ISdescrl[DESCRLEN+ 1  ]; 
cm.  type  =  RMTJMONE; 
cm.length  =  0; 
cm.mapfO]  =  NULL; 
cm.mapUl  =  NULL; 
cm.map[2)  =  NULL; 

/*  this  is  absolutely  necessary!!!!  Otherwise  pr_load_colormap  might 
not  allocate  storage  for  the  colormap,  if  the  garbage  found  in 
the  cm  structure  seems  to  make  sense.  The  result,  of  course,  is 
segmentation  fault.  This  bug  was  very  hard  to  find.  */ 

/*  exec  sql  select  PIXRECT  (ijmage),  COLORMAP  (i Jmage), 

DESCRIPTION  (ijmage) 
into  :pr,  :cm,  :descr 
from  image 
where  i  Jd  =  :imageno; 

This  Image-SQL  statement  is  transformed  into  the  following 
sequence  of  statements  by  the  preprocessor: 

*/ 

{ 

Ilsqlnit  ((char  *)0); 

IIwritedb(”retrieve  unique(c=(count(”); 

IIwritedb( ’’result"); 

IlwritedbC.”); 
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II  writedb(satt  [imageno  ].a_name ); 

DwitedbC)))”); 

IIsqRinit((char  *)0); 
if  (llerrtest()==0)  { 

if  (IlnextgetO  !=0)  { 

Hretdom(  1 ,30,4,&c); 

} 

IIsqFlush((char  *)0); 

} 

} 

{ 

if  (IlcsrOpen((char  *  )0,”cursor_output  1  ”,”db  1  ”,0,media_name)  !=  0)  { 

II  writedb(”retrieve(ISfh  1  =”); 

Uwritedb(media_nanie); 

IIwritedM””); 

II  writedb(”f_id,I  Sdescr  1  =”); 

IIwritedb(media_name); 

IIwritedb(”.descrp”); 

II  writedb(”  )where  ”); 

IIwritedb(media_name); 

IIwritedb(”.i_id=”); 

IIwritedb(”result.”); 

IIwritedb(satt[imageno].a_name); 

IIcsiQueiy  ((char  *)0); 

}  /*  Ilcsropen  */ 
while  (look_more==0)  { 

if  (IIcsrFetch((char  *)0,  ”cursor_outputl”,”dbl”)  !=  0)  { 

IIcsrRet(  1 ,32,0,1  Sfn  1 ); 

IIcsrRet(  1 ,32,0,ISdescr  1 ); 
for  (i=0;i<MAX_PATH+ 1  ;i++)  { 
if  (ISfnIIi]==32)  { 

file_name(i]=0; 

} 

else  { 

file_name[il=ISfnl  [ij; 

} 

}  /*  end  for  */ 

printf(”\nRecord  no  %d  filename  :%s:”J+l,  ISfnl); 

if  ((img_file=fopen(filejriame,”r”))==NLiLL) 

{ 

printf(”\n%s”,  file_name); 

printf(”\nThe  file  cannot  be  opened  !!\n”); 

putcharC\007’); 

} 

else  { 

pr=pr_Ioad(img_fiIe,  &cm); 
if  (pr==NULL)  { 

printf(”\nThe  file  does  not  contain  proper  image”); 
putchar(\007’); 

} 

else  { 

printf(”\nShow  image 
present_photo(j+  l,pr,&cm,ISdescrl ); 
}  /*  end  else  */ 

}  /*  end  else  */ 
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fclose(img_file); 

} 

printfC’ta”); 

IIcsrEFetch((char  *)0); 

j++; 

if  (j==c)  { 

look_more  =  1; 

}; 

} 

IIcsrClose((cha  *  )0,”cursor_outpiit  1  ”,”db  1  ”); 

} 

} 

. . . . . . . ./ 

/*  This  procedure  search  through  the  media  relation  and  get  the  */ 

/*  file  name  that  match  with  the  result  table  and  send  to  the  V 
/*  play  sound  procedure  */ 

. . . . . . . . * . »**/ 

display  _sound  (soundno, tupleno) 
int  soundno; 
int  tupleno; 

{ 

char  answer,  repeat,  yes_no_answer  (); 
char  query _phrase[DESCRLEN + 1  ], 
in_phrase  [DESCRLEN  +11; 

int  i=0j=0,  k,  c,  pid,  query_err,  query  Jen,  in_len,  f_fiag,look_more=0; 
int  show_pid,  wait_pid; 
int  ISerror; 

STR  path  file_name; 

char  ISfnl  [FILENAMELEN+ 1  ]; 

char  ISdescrl  [DESCRLEN  + 1  ]; 

{ 

Usqlnit  ((char  *)0); 

Ilwritedb(”retrieve  unique(c=(count(”); 

Dwritedb(’’resu]C); 

IIwritedb(”.T’); 

II  writedb(satt  [  soundno  ].  a_name ); 

IlwritedbC)))"); 

IIsqRinit((char  *X)); 
if  (IIerrtest()==0)  { 

if  (IInextget()  !=0)  { 

IIretdom(  1 ,30,4,&c); 

} 

IIsqFlush((char  *)0); 

} 

} 

if  (IIcsrOpen((char  *)0,”cursor_output  r,”dbr.O,media_name)  !=  0)  { 
IIwritedb(”retrieve(ISfn  I  =”); 

IIwritedb(media_name); 

IlwritedbC’.”); 

IIwritedb(T _id,ISdescr  1  =”); 

IIwritedb(media_naine); 

1 1  wri  tedb(”.descrp” ); 

IlwritedbC’ )wh ere  ”); 

IIwritedb(media_name); 

IIwritedb(”.s_id=”); 
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IIwritedb(”result.”); 

IIwritedb(satt[soundno].a_name); 

IIcsiQuety  ((char  *)0); 

}  /*  Ilcsropen  */ 
while  (look_more==0)  { 

if  (IIcsrFetch((char  *)0,  ”cursor_outputl”,”dbl”)  !=  0)  { 

IIcsrReK  1 ,32,0  JSfn  1 ); 

DcsrRetd  ,32,0  JSdescrl ); 
for  (i=0;i<MAX_PATH+l;i++)  { 
if  (ISfnl(i]==32)  { 

file_name[i]=0; 

} 

else  { 

file_name[i]=ISfnl[i]; 

} 

} 

printf(”\nRecord  no  %d  ”  j+ 1 ); 
printf(”\nPlay  the  sound  ?  (y/n) ::  ”); 
if  (yes_no_answer()  ==  V)  { 
play_sound(fi  le_name ) ; 

} 

printf(”\n”); 

IIcsrEFetch((char  *X)); 

j++; 

if  (j==c)  { 

look_more  =  1 ; 

I 

}  /*  IICSRFECCH  */ 

}  /*  end  while  */ 

IIcsrQose((char  *)0,”cursor_output  1  ”,”db  1  ”); 

}  f*  end  of  display  sound  ()  */ 

/****************************4i«**4i*4(**4>****  *************  ***********/ 

present_photo2  (number,  pixels,  colormap,  description) 

int  number; 

struct  pixrect  ‘pixels; 

colormap_t  ‘colormap; 

char  ‘description; 

{ 

char  answer,  yes_no_answer  (); 
int  i,  error,  pid; 

Frame  frame; 

Canvas  canvas; 

Pixwin  *pw; 

printf  ("Number:  %d\n”,  number); 
printf  (”Description:\n»%s«\n\n”,  description); 
answer  =  ’y’; 
if  (answer  ==  ’n’) 
return  (0); 
else  { 

pid  =  fork  (); 
if  (pid  <  0)  { 

printf  ("Starting  display  process  failed\n\n"); 
return  (-1); 

} 

if  (pid  >  0)  /*  this  is  parent  process  */ 
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return  (pid); 

if  (colormap  ==  NULL)  { 
printf  ("Cannot  show  it  -  no  colormap.\n\n”); 
exit  (1); 

} 

frame  =  window_create  (NULL,  FRAME, 

FRAME_LABEL,  "IMAGE”, 

FRAME_NO_CONFIRM,  TRUE, 
WIN_WIDTH,  pixels->pr_size.x  +  20, 

WIN_HEIGHT,  pixels->pr_size.y  +  50, 

WIN_ERROR_MSG,  ” Cannot  create  window.”, 
0); 

if  (frame  ==  NULL)  { 
printf  ("Cannot  create  frame\n\n"); 
exit  (1); 

} 

canvas  =  window  create  (frame,  CANVAS, 

WIN_WIDTH,  pixels->pr_size.x, 

WIN  HEIGHT,  pixels->pr_size.y, 

0); 

if  (canvas  ==  NULL)  { 
printf  ("Cannot  create  canvas\n\n”); 
exit  (1); 


} 

pw  =  canvas_pixwin  (canvas); 
if(pw==  NULL)  { 
printf  ("pixwin  is  NULL\n\n"); 
exit  (1); 

} 

window_fit  (frame); 

if  (co!ormap->type  ==  RMT_EQUAL_RGB 
&&  colormap->length  >  0)  { 
pw  setcmsname  (pw,  "photo"); 
if  (error  =  pwjputcolormap  (pw,  0,  colormap->length, 

colormap->mapf0],  colormap->map[l],  colormap->map[2]))  { 
printf  ("Cannot  load  colormap.Nn"); 
printf  ("error  code  =  %d\n”,  error); 

printf  ("type  =  %d\nlength  =  %d\n",  colormap- >type,  colormap->length); 
/*  for  (i  =  0;  i  <  colormap->length;  i  ++)  { 

printf  ("  %x  %x  %x\n",  *(colormap->map(0]  +  i), 

*(colormap->map[  1 )  +  i),  *(colormap->map[2]  +  i)); 

}*/ 

exit  (1); 

} 

} 

else  { 

printf  ("Cannot  show  photo  -  colormap  not  appropriate.NnNn”); 
exit  (1); 


} 

if  (pw_write  (pw,  0,  0,  pixels->pr_size.x,  pixels->pr_size.y, 
PIX_SRC, 
pixels,  0,  0)) 

printf  ("Cannot  write  image  to  screen An\n”); 


else 

window_main_loop  (frame); 
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window_destroy  (frame); 
exit  (0); 

}  /*  of  (answer  =  y),  showing  the  photo  */ 
return  (0); 

} 

/***********************************************************«*******/ 

/*  This  procedure  create  the  embeded  psudo  extended  SQL  for  user  */ 

/*  display  on  the  screen  */ 

/*****************«**********•******«**************** ************ ***/ 
void  processquery2() 

{ 

char  a; 
int  ij,k; 

STR_name  media_att; 
int  medianum=0; 

int  image_select=0;  /*  For  the  choose  of  the  extra  attribute  of  type  image  */ 
int  snd_select=0;  f*  For  the  choose  of  extra  type  sound  */ 

/*  For  test  purpose  only  V 
for  (j=0J<numconJ++)  { 

printf(”\nGroup  %d  Att  %s  Atttype  %d  Con  %s”,att_group[j],att[j],contype|j],con[)]); 
if  (contype[jl==l)  { 

printf(”\nCREATE  TABLE  M%d  AS  SELECT  i_id  FROM  %s  WHERE  CONTAIN 
( %s)”,  j,att(j  ],con(j  ]); 

image_select  =1; 

} 

if  (contype[j]==2)  { 

printf( ”\nCREATE  TABLE  M%d  AS  SELECT  s_id  FROM  %s  WHERE  CONTAIN 
(%s)”,  j,att[j],conIjl); 

snd_select=l; 

} 

} 

/*  End  test  */ 

printf(”\nProcess  Ingres  Interface  in  the  database"); 
if  (icond==0)  { 

printf(”\nProcess  only  formatted  data”); 
printf(TVi\nExec  SQL  Select  ”); 
for  (i=0;i  <  n;i++)  ( 

printf(”%s.%s",satt[i].t_name,satt[i].a_name); 
if  (i  <  n-1)  { 

printf(",”); 

} 

)  /*  End  for  */ 
printf(”\nFrom  ”); 
for  (i=0;i  <  m;i++)  ( 

printf(”%s",stab[i].t_name); 
if  (i  <  m-1)  { 

printf(”,”); 

) 

) 

if(cond==l)  { 

printf("\n  Where  ”); 

if  (numcon  ==  1)  { 
gcond=0; 
numgroup=0; 

} 
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if  (m>l)  { 

printf(”(  %s  )  and  ”,  join_condition); 

} 

if  (numgroup  >=  1)  { 
printffT); 

} 

k=0; 

if  (m>l)  { 

printf(”(  ”); 

} 

if  (gcond==l)  { 

for  (i=0;i<=numgroup;i++)  { 

for  (j=group_count[k].begingroupJ  <  group_count[  k].  end  group  J++)  { 
if  (contype[j]==l)  { 

printf(”Contain  (%s.%s,%s)  ”,tab[j],att[j],con[j]); 

} 

if  (contype|jJ==2)  { 

printf(”Contain  (%s.%s,%s)  ”,tab[j],att|j].con[j]); 

} 

else  { 

printf(”  %s.%s  %s  ”,tab(j],att(jl,con(jl); 

} 

if  (j!=group_count[i].endgroup-l)  { 
printft”  and  ”); 

} 

} 

k=k+l; 

if  (numgroup  >=  1)  { 
printf(T); 
if  (k  <=  numgroup)  ( 


if  (numgroup  ==  0)  { 

if  (contype[0]==l)  { 

printU '’Contain  (%s.%s,°/bs)  ”,tab[0],att[0],con[0]); 

} 

else  { 

printf(”  %s.%s  %s  ”,tab[0]^tt[0],con[0]); 

} 

} 

if  (m>l)  { 

printf(” )”); 

} 

}  /*  End  if  condition  */ 

} 

else 

{ 

for  (i=0;i  <=  numgroup;i  +  +  )  { 

printf(”\nprocess  group  %d”,  i); 

printf(”\nExec  sql  create  table  G%d  as  JOIN  f%d  and  m%d  ”,  i,i,i); 

printf( ”\nCRE ATE  TABLE  f%d  as  SELECT  ”,i); 
for  (i=0;i<n-l;i++)  { 


printf(”%s.%s,  ”,satt[i].t_name,satt[i).a_name); 

} 

printf(”%s.%s  ”,satt[i].t_name,satt[i].a_name); 
printf(”\nFrom  ”); 
for  (j=0j  <  mj+  +  )  { 

printf(”%s",stab[j  ].t_name); 
if  (j  <  m-1)  { 

printf(”,”); 

} 

}  /*  End  from  */ 
printf  (”\n  Where  ”); 
if  (m>l)  { 

printf(”(  %s  )  and  (  ”,  join_condition); 

} 

for  (j=group_count[i].begingroupj  <  group_count{i].endgroupJ++)  { 
if  (contypefj  ]==!){ 

printf(”  (%s  in  select  i_id  from  M%d)  ”,att[j]  j); 

} 

if  (contype[j]==2)  { 

printf(”  (%s  in  select  s_id  from  M%d)  ",att[j]  jV, 

} 

else  { 

printf(”  %s  %s  ”,att(j],conOJ); 

} 

if  (j ! =group_count[i  l.endgroup- 1 )  { 
printf("  and  ”); 

) 

} 

k=k+l; 

if  (numgroup  >=  1 )  { 
printf!”)”); 
if  (k  <=  numgroup)  { 


if  (m>l)  { 

printfC )  ”); 

} 

} 

if  (numgroup  >  0)  { 

printf  (”\nEXEC  SQI.  CREATE  TABLE  OUTPUT  AS  SELECT  ALL  FROM  ”); 
for(i=0;i<  numgroup;i  +  +  )  { 
printf  (”G%d  or  ”,i); 

} 

prir.tf(”G%d”,  i); 

}  /*  End  if  more  than  one  group  */ 

/*  Print  out  the  data  */ 
printf(”\nSELECT  ”); 
for  (i=0;i<n-l;i++)  { 
printf(”%s,  ”,satt[i].a_name); 

} 

printf(”%s  ”,satt[i].a  name); 
printf(”\nFROM  OUTPUT”); 
gcond  =  0; 
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/*  This  procedure  create  the  embeded  psudo  extended  SQL  for  user  */ 
/*  display  on  the  screen  V 

. . ****** . *** . **** . 

void  processqueryO 

{ 

char  a; 

int  ij,k; 

int  medianum=0: 

number_media=0; 

printf(”\n\nSelect  ”); 

for  (i=0;i  <  n;i+  +  )  { 

printf(”%s.%s”,satt(i].t_name,satt[i].a_name); 
if  (i  <  n-1)  { 

printf(V); 

} 

} 

printf(AnFrom  ”); 
for  (i=0;i  <  m;i  +  +  )  { 

printf("%s",stab[i].t_namO; 
if  (i  <  m-1)  { 

printfC,”); 

1 

} 

if  (cond==  1 )  { 

printf("\n  Where  "): 
if  (numcon  ==  1 )  { 
gcond=0; 
numgroup=0; 

> 

if  (numgroup  >  -  1 )  { 
print  fCC); 


k=0; 

if  (goond==l )  { 

for  (i=0;i<=numgroup;i  +  +  )  { 

for  (j= group  count [kibegingroup  j  <  group_count[k l.endgroup;j+  + )  { 
if  ((cont>pe[j)==l)|l(contype[j]==2))  { 

printf( "Contain  (°/6s,%s)  ",aa0],con(j]); 
scrcpy<media_att[number_media]Tatt[j)); 
uumberrnedia=nurnber_rned;a  *■ ! ; 

} 

else  { 

printf("  %s  °'os  ",att[j],con[j]); 

} 

if  (j'=group_count[i  l.endgroup- 1 )  { 
printfC  and  "); 


}  /*  END  FOR  J  •/ 
k=k+l; 

if  (numgroup  >=  1 )  { 
printfC)"); 
if  (k  <=  numgroup)  { 
printfC  or  ("); 
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} 


}  /*  End  second  for  */ 

} 

/*  only  one  condition  process  */ 
if  (numgroup  ==  0)  { 

if  ((contype(0]==  1  )||(contype[0]==2))  { 
printf(”Contain  (%s,%s)  ”,att[0],con[0]); 
strcpyf  medi  a_att  [  number_media  ]  .att  (0  ]); 
number_media=number_media+ 1; 

} 

else  { 

printff”  %s  %s  ,att[0],con(0]): 

} 

} 

)  /*  End  if  condition  */ 


processquery2(); 


/*  This  procedure  get  the  query  description  for  the  media  attribute*/ 

/*  from  the  user  phrase  by  phrase  V 

/**«V*******»********** ******************** *************** **********/ 

char  process_icon() 

{ 

char  answer,  repeat,  yes_no_answer  (); 
char  query _phraselDESCRLEN  + 1  ], 
in_phrase[DESCRLEN  + 1  ]; 
int  i,  query_err,  querj'_len,  in_len,  f_flag: 
char  descr[DESCRLEN+ 1  ]; 
int  show_pid,  wait_pid; 
int  imageno; 
icond  =  I ; 
do 
{ 

query  __err  =  0; 
query  _len  =  0; 
query  _phrase[0]  =  \0'\ 

printf(”\nPlease  enter  your  query  description  (one  phrase  per  linc;\n\ 
end  with  empty  line):\n”); 

do  /*  until  query jphrase  input  */ 

{ 

i  *  0. 

while  ( (in_phrase(i  +  +  ]  =  getcharO)  !=  ’Sn’  &&  i  <  127  ); 
if  (  in_phrase[':-l]  !=  *\n’ ) 

{ 

in_phrase[i-l]  -  ,\n’; 

printf  ("The  phrase  is  too  long,  it  will  be  shortened\n"); 
while  (  getchar  0  !=  V’ ); 

}  /*  End  if  */ 
in_phrase[i!  =  \0’; 
if  (  (  in_len  =  i  )  >  1  ) 

{ 

if  (  query  Jen  +  in_len  <  DESCRLEN  ) 

{ 

strcat(query_phrase,in_phrase); 
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qucry_lcn  =  query  Jen  +  injcn; 

)  /•  End  if  V 
else 
{ 

primf("The  last  phrase  extended  beyond  the  maximum  \ 
description  length.Nnit  will  be  ignored\n"); 
break; 

)  f*  End  else  */ 

}  f*  End  if  */ 
if  ( !  query  Jen  ) 

printf("\nAn  empty  string  is  not  allowed  as  a  query  description.Wv 
Please  type  at  least  a  single  word:W); 

}  f*  End  do  */ 

while  ( ( in  Jen  >  1 )  II  '.query  Jen  );  /*  end  query  _phrase  input  */ 

prinif(’'The  query  description  now  is:\n»%s«Vi\n",query_phrase);  /*  print  the  dscription  */ 
}  while  (query_err); 

strcpy(con[numcon],query_phrase);  /*  copy  description  into  condition  array  */ 

process_icon2  (query jphrase.numcon); 

} 

|***********************%*******************************************y 

f*  This  procedure  accumulate  the  condition  from  the  user  and  form  */ 

I*  the  group  condition  of  and  and  or  */ 

/*  Mean  condition  that  compose  of  disjunctive  normal  form  */ 
/**********♦**********»«***********************************♦********/ 
void  gconditionf) 

{ 

int  endgroup,i,more,found=FALSE; 

charans; 

gcond=l; 

endgroup  =  0; 

more  =  0; 

numcon=0; 

numgroup=0; 

group_count[0].bcgingroup  =  numcon; 
while  (more  !=  1)  ( 
while  (endgroup  !=  1)  ( 
for  (i=0;i  <  att_index;i++) 

1 

if  (m  >  1  )  {  /*  if  more  than  2  tables  in  the  selection  */ 

pnntf("\nEntcr  table  name "); 

gcts(tab[numcon]); 

strepy  (table_array[tablejndex].table_name,  tab[numcon]); 

) 

if  (m— 1)  {  /*  if  only  1  table  just  copy  the  table  */ 

strepy  (iab[numcon],  siab[0].t_namc); 

} 

printf("ViEnter  attribute  ");  /*  attribute  for  condition  */ 

gctsfat'/numcon]); 
att_group[numcon  j =n  umgroup; 

gctatttypc(tab[numcon],  au[numcon]^ituype[numcon]); 
if  (strcmp(atttypelnumcon],"image")=0)  /*  check  for  image  condition  */ 

{ 

contype[numcon]=  1 ; 
process_icon(); 

) 
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else  if  (strcmp(atttype[numcon],"sound")=0)  f*  check  for  sound  condition  */ 

{ 

contype[numcon]=2; 

processJconO; 

} 

else  {  /*  if  not  media  condition  then  it  is  formatted  data  */ 

printf("Enter  the  condition  \n"); 
gets(con[numcon]); 
contype[numcon]  =0; 

printf("\n  Where  %s  %s",att[numcon],con[numcon]); 

} 

numcon=numcon+ 1; 
pnntf(AnEnd  group  ?"); 
ans=yes_no_answerO; 
if  ((ans=121)ll(ans=89))  { 
endgroup=l; 

printf("\nGroup  %d",numgroup);  /*  print  for  checking  group  */ 

printf("\nCondition  %d",numcon); 

i=600; 

} 

}  /*  End  for  */ 

}  /*  END  WHILE  */ 
printf('\iEnd  condition  ?"); 
ans=ycs_no_answerO; 
if  ((ans=12l)ll(ans=89)) 

{ 

group_count[numgroup].endgroup  =  numcon; 

endgroup=l; 

more  =  1; 

i=0; 

} 

else  { 

more  =0; 
endgroup=0; 
more  =  0; 
i=0; 

group_count[numgroup].endgroup  =  numcon;  f*  assign  endgroup  and  begin  */ 
numgroup=numgroup+ 1 ; 
group_count[numgroup].begingroup  =  numcon; 

) 

)  f*  End  more  */ 

} 

^/* ***♦*******************************»»*****», »**»******»***»*»********y 

f*  process  the  array  of  the  variable  and  generate  the  query  of  the  SQL*/ 

/*  to  process  in  procedure  join  */ 

^******************* ********************* ******************************/ 
void  processconditionO 
t 

char  ans2,a; 
int  ij; 
cond=l; 
gcond=0, 

printf("\nGroup  condition  ?  (y/n)  "); 
ans2=yes_no_answer0; 
if  ((ans2=121)ll(ans2=89)) 
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( 

gcond= 1 ; 
gconditionO; 

} 

else 

{ 

gcond=0, 
if  (m  >  1 )  { 

printf("\nEnter  table  name  ");  /*  enter  table  name  for  condition  */ 

gets(tab[0]); 

} 

if  (m=l)  { 

strepy  (tab[0],  stab[0].t_name); 

) 

printf('\iEnter  attribute  name  ");  f*  enter  attribute  name  for  condition  */ 
gets(au[0]); 

printf('"vi%s  %s  %s",  tab[0],  att[0],  atttype[0]); 
getatttype(tab[0J,att[0],atttypc[0]); 

if  (strcmp(atttype[0],"image")— 0)  /*  check  for  image  */ 

{ 

contype[0]=l; 

processJconO; 

} 

else  if  (strcmp(atttype[0] "sound")— 0)  f*  check  for  sound  */ 

{ 

contypc[0]=2; 

processJconO; 

) 

else  ( 

printf("Enter  the  condition  \n");  /*  formatted  condition  */ 

gets(con[0]); 

contype[0]=0; 

printf(”\n  Where  %s.%s  %s",tab[0],att[0],con[0]); 

} 

} 

} 

/***************<  ^*******^ ****** ^** ********************************  J 

/*  This  procedure  print  the  attribute  name  of  the  table  assign  to  */ 

I***************************** ****************************** ***^.******* I 

void  p_att(tab_name) 

STR_name  tab_name; 

{ 

int  ij; 

for  (i=0;i<=  table_counl;i-H-)  {  /*  loop  until  no  morte  table  */ 

if  (strcmp(table_array[i].table_name,tab_name)=0)  { 
x  =  i; 

y  =  table_array[i].att_entry; 

primf("\n%s",table_arrayti].tablc_name);  [*  print  table  name  */ 
while  (y  !=  -1)  { 

printf('\nAttributc  %s  data  type  is  %s"^tt_array[y].att_name,ait_array[y].data_type); 

y  =  att_array[y].nextjndex; 

)  f*  End  while  y!=-l  */ 

if  (y=-i)  ( 

i=500; 

}  /*  Exit  loop  */ 
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}  /*  End  if  */ 
f*  End  for  */ 


/*  Print  out  all  the  tables  information  on  screen  */ 

p*************************************** ************************************  I 

void  p_tableO 

{ 


int  i  =  0; 


pnntf("\t**Table  Name**Nn"); 
for  (i  =  0;  i  <  table  count;  i++) 

l 

printf("'4  %s\n",table  array[table_list[i]].table_name); 
if  ((i%  15)=  14) 

{ 

printf("'n*RETURN  TO  CONTINUE*Sn"); 
while  ((c  =  getcharQ)  !=  ’Nn’) 


♦ 

printf(”V**Tablc  Name**^"); 

} 

}  (*  End  of  for  loop  */ 

}  /*  End  of  print_a!l_tableO  */ 

j***********  **************************************** I 

f*  Generate  the  result  table  for  retrieval  process  */ 

/*  This  procedure  process  the  query  and  condition  */ 

/*  By  using  the  selcct_array  and  condition_array  */ 

[*  also  group_array  */ 

I******************** *******************************  I 

void  qLreuieveO 

{ 

int  ijdc; 

i=0;  /*  set  up  index  to  0  */ 

/*  Below  is  the  embcded  C  code  for  the  SQL  C  for  INGRES  */ 
/*  This  is  equivalent  to  the  SQL  query  */ 

/*  exec  sql  select  (varl,  var2, ...) 
from  (tablel,  tablc2,...) 

where  (condition  1  and/or  condition2  and/or ...); 

*/ 

Ilsqlnit((char  *)0y, 

IIwritedb(”retrieve  into  resultC'); 
for  (i=0;i<n-l;i++)  { 

II  writedb(satt[  i]  .t_name); 

IIwritedb(".H); 

II  writedb(sau[i]  .a_name); 

IIwritedb(","); 

}  /*  end  for  */ 

II  writedb(satt[  i]  ,t_name); 

IIwritedb("."); 

IIwritedb(satt[i].a_name); 

IlwritedbC’)''); 
if  (cond=0)  ( 
if  (m>l)  { 

IIwritedb{"where "); 

IIwritedb(join_condition); 

) 
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} 

if  (cond=l)  { 

IIwritedb("where  ("); 
if  (m>l)  { 

HwritedbC'O; 

Ilwritedb(join  condition); 

nwritedbO"); 

nwritcdbC'and  "); 

) 

if  (gcond  =  1)  { 

nwritedbC’O; 

for  (i=0;i<=numgroup;i++)  { 

for  (j=group_count[k].begingroup;j<group_count[k].endgroup;j++)  { 
if  (contype[j]=0)  { 

IIwritedb(tab[j]); 

IlwritedbC."); 

IIwritedb{att[j]); 

IIwritedb(con[j]); 

)  I*  end  if  */ 

/*  for  the  media  condition  the  query  will  get  the  value  in  the  */ 
f*  intermediate  table  generate  in  the  procedure  processjcond  */ 
if  (contype[j]==l)  {  I*  image  condition  */ 

IIwritedb(tab[i]); 

IIwritedb("."); 

IIwritedb(ail[jl); 

Uwritedbf'- "); 

nwritedb("m"); 

IlwritedbC'."); 

IIwritedb("i_id"); 

} 

I*  for  the  media  condition  the  query  will  get  the  value  in  the  */ 

I*  intermediate  table  generate  in  the  procedure  processjcond  */ 
if  (contype[j]==2)  {  /*  sound  condition  */ 

IIwritedb(tab[j]): 

IlwritedbC'."); 

IIwritedb(att[j]); 

IIwriiedb{"="); 

IIwritedb("m");  /*  This  is  the  media  table  followed  by  the  */ 
IlwritedbC'.");  f*  condition  number  in  the  query  */ 
Dwritedb("sjd"); 

} 

I*  Between  group  has  the  boolean  and  to  be  the  conjunction  */ 
if  (j  !=  group_count[i].endgroup-l)  { 

IlwritedbC'  and "); 

} 

} 

k=k+l; 

f*  This  is  suppose  for  the  or  boolean  but  still  has  some  bug  */ 
if  (num group  >=  1)  l 

if  (k  <=  numgroup)  { 

Ilwritedb  (")  or  ("); 

) 

) 

} 

if(gcond=l)  { 
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IlwritedbC)”); 

) 

) 

if  (numgroup==0)  { 
if  (contype[0]==0)  { 

Il\vritedb(tab[OD; 

IlwritedbC.”); 

Dwritedb(attlO]); 

IIwritedb(conlO]); 

}  **  end  if  */ 
if  (contype[0]==l)  { 
llwritedb(tab[0]); 

IlwritedbC.”); 

Uwritedb(att[0]); 

IIwritedbC=”); 

IlwritedbCm"); 

IlwritedbC.”); 

DwritedbCiJd”); 

} 

if  (contype[0]==2)  { 

Ilwritedb(tab[0]); 

IlwritedbC.”); 

IIwiitedb(att[0]); 

IlwritedbC*”); 

IlwritedbCm”); 

IlwritedbC.”); 

IIwritedbCs_id”); 

} 

}  /*  end  if  no  group  */ 

lIwritedb(T); 

J  /*  end  if  condition  */ 

IIsqSync(0,(char  *)0);/*  send  the  signal  to  INGRES  to  execute  the  function  */ 

/******************************* ***********************************^ 

/*  This  procedure  set  the  cursor  point  to  result  table  and  print  */ 

/*  After  finish  the  formatted  data  then  go  to  the  media  data  */ 

/*  The  media  data  begin  with  image  and  then  sound  */ 

/** ** ******* ************* ** ********************** ***** *************/ 

void  ql_printdata() 

{ 

int  c=0j=0,k=0, 1=0, temp; 
char  char_value[21  ],a; 
char  file_name[20]; 

int  integer_value,media_value, found, media  1  _value; 
float  real_value; 
int  i=0,select=0; 

/*#  line  3169  "db.sc"  */  f  select  */ 

{ 

Ilsqlnit((char  *)0); 

IIwritedb(”retrieve{c=(count(”); 

IIwritedb( ’’result”); 

IlwritedbC.”); 

Hwritedb(satt{0].a_name); 

IlwritedbC)))”); 

IIsqRinit((char  *)0); 
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if  (IleiTtestO  ==  0)  { 
if  (IlnextgetO  !=  0)  { 

IIretdom(  1 ,30,4,&c); 

}  /*  Ilnextget  */ 

IIsqFlush((char  *)0); 

}  /*  Ilentest  */ 

} 

1-0; 

printf(rNnThere  are  %d  records  that  match  the  query”  ,c); 

/*#  line  3171  ”db.sc”  */  f*  host  code  V 

if  (IIcsrOpen((char  *)0,”cursor_output”,”dbl”,0, "result”)  !=  0)  { 
IIwritedb(”retrieve(”); 
for  (select=0;select<n-l;select++)  { 

IIwritedb{satt[select].a_name); 

IIwritedb(”=”); 

IIwritedb(”result.”); 

IIwritedb(satt[select].a_name); 

IIwritedb(”,”); 

} 

IIwritedb(satt  [select  ]  .a_name ) ; 

IIwritedb(”=”); 

IIwritedb(”result.”); 

Ilwritedb(satt[select].a_name); 

llwritedb(”)”); 

IIcsrQuery((char  *)0); 

}  /*  NcsrOpen  */ 
printf(”\n”); 
look_more=0; 

1=0; 

if  (c==0)  { 

look_more=l; 

} 

/*  Fetch  the  cursor  to  the  result  relation  which  is  the  intermediate  table 
hold  the  result  from  the  query,  then  print  out  the  tuple  one  at  a  time 
until  no  more  record  to  print  to  the  user  */ 
while  (look_more  ==  0)  { 

if  (IIcsrFetch((char  *)0,"cursor_output” ,”dbl”)  !=  0)  { 
printf(”record  id  %d  \t",l+ 1 ); 
for  (i=0;i<n;i+  +  )  { 

if  (strcmp(satt[i].data_type,”c20”)==0)  { 

DcsrRet(  1 ,32,0,char_value); 

printf(”%s  :  %s”,satt[il.a_name,char_value); 

} 

if  (strcmp(satt[il.data_type,”integer”)==0)  [ 

IIcsrRet(  1 ,30,4,&integer_value); 

printf(”%s :  %d  ”,satt[i].a_name,integer_value); 

} 

if  (strcmp(satt[i].data_type,”float”)==0)  { 

IIcsrRet(  1 ,31 ,4,&real_value); 

printf(”%s :  %8.2f  ”,satt[i].a_name/eal_value); 

if  (strcmp(satt[i].data_type,”image”)==0)  { 

UcsrRet(  1 ,30,4,&media_value); 

printf(”%s  id  is  %d  ”,satt[i].a_name,media_value); 

} 


121 


if  (strcmp(sattli].data_type  ,”sound”)==0)  { 

IIcsrRetf  l,30,4,&medial_value); 

printf(”%s  %d”,satt[i].a_name,medial_value); 

} 

}  /*  end  for  select  <  n*/ 
printf(”\n”); 

IIcsrEFetch((char  *)0);  f*  fetch  the  next  record  to  the  cursor  */ 

1++;  /*  increment  1  as  the  counter  */ 
if  (l==c)  {  /*  check  if  no  more  data  to  print  */ 

!ook_more  -1;  /*  exit  of  the  loop  */ 

} 

}  f*  IIcsrFetch  */ 

}  /*  end  while  */ 

IIcsrClose((char  *  )0,”cursor_output”,”db  1  ”);  /*  close  the  cursor  */ 
printf(”Press  any  key  to  continue 
/*  stop  before  change  to  the  next  function  so 
the  user  can  see  the  result  on  screen,  until  he  hit  any  key  */ 
a=  getcharO; 

/*  this  for  the  check  for  the  media  selection  */ 
if  (c—0)  { 

i=9999;  /*  if  no  record  for  the  media  data  not  process  any  thing  */ 

} 

for  (i=0;i<n;i++)  { 

if  (strcmp(satt[i].data_type,”image”)==0)  { 
strcpy(table_array[table_index ].table_name,  satt[i ].t_name); 

found  =  check_table_name();  /*  search  for  the  media  name  */ 
table_cursor  =  table_entry; 
strcpy(media_name,satt[i].a_name); 
get_media_name( ); 
di  splay  _photo(  i  j); 

/*  display  photo  search  for  the  image  relation 
that  match  the  result  tuple  then  open  the  file  */ 

} 

if  (strcmp(satt[i].data_type  ”sound”)==0)  { 
printf(”\nSound  management”); 
strcpy(table_array[table_index].table_name,  satt[i].t_name); 
found  =  check_table_name(); 
tablecursor  =  table_entry; 
strcpy(media_name,satt{i].a_name); 
get_media_name{); 
display  _sound(i  j ); 

/*  play  sound  search  for  the  sound  relation 
that  match  the  result  tuple  then  open  the  file  */ 

} 

}  /*  end  fo.*  select  <  n*/ 
printfX”\n”); 

f*  Drop  table  result  after  finished  print  */ 

{ 

Ilsqlnit((char  *)0); 

IIwritedb("destroy  result”); 

IIsqSync(0,(char  *)0); 

) 

} 


************** . ***** . * . . . ***** . *•***/ 

/*  The  main  procedure  for  the  retrieve  operation  */ 
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/*  m  and  n  is  the  parameter  for  table  and  attribute  repectively  */ 

/*  For  retrieve  table  name  and  attribute  name  from  the  user  */ 

/**•** . . . . . . . . . . . 

void  retrieve() 

{ 

int  i  j,x,y,z,foimd=0; 

char  table_name[20],attname[20],att_type[20]rAns>MoreT£i; 
init(); 

/*  Select  table  */ 
for  (i=0;i<100;i++)  { 

buffli]  =  NO’;/*  assign  null  value  or  end  oi  string  to  buffer*/ 

} 

m=0; 

i=0; 

k=0; 

strcpy(bufT,”?”); 

while  (strcmp(buff,’’?”)==0)  {  /*  select  loop  for  help  function  */ 
printfCVSelect  the  table(s)  saparate  by  comma  <,>  :  "); 
gets(bufO; 

if  (strcmp(buff,”?”)==0)  { 
p_table(); 

} 

if  (strcmp(buff ”)==0)  { 
return; 

} 

i-0; 

}  /*  end  while  buff  ==  0  */ 

while  (i<=tab!e_count)  {  f*  check  loop  with  the  maximum  number  table  */ 
for  (j=0  j<  1 3  j+ +)  /*  each  table  has  less  than  or  equal  to  1 2  char  only  */ 

{ 

if  (bufflk]==44)  { 
j=55; 
k=k+l; 

i-i+1; 

} 

els*- ! 

if  (buff[k]==0)  {  /*  if  null  value  in  buffer  (end  of  string)  */ 
m=i+l; 
j=55; 
i= 1 000; 

stab[i].t_name[j  ]=bufflk  ]; 
k=k+l; 

} 

) 

}  /*  End  while  */ 
for  (i=0;i<m;i++)  { 

strcpy(table_array[table_index  l.table_name,  satt[i ].t_name); 

found  =  check_table_name{);  /*  search  for  the  media  name  */ 
if  ('.(found))  { 

/*  check  for  the  valid  table  name  if  not  found  then  return  to  calling  program  */ 
putcharOvOOT); 

printf(”\nTable  %s  not  found  please  redo  again  !!!”  ,satt[i].t_name); 

printf(”\nPress  any  key  to  continue  !!”); 

a=getchar(); 
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return; 

}  /*  end  else  */ 

}  f*  end  for  loop  */ 

f*  Specify  the  join  condition  if  there  are  more  than  2  table  select  */ 
if  (m  >  1)  { 

strep jKjoin_condition,”?”); 

while  (strcmp(join_condition,”?”)==0)  { 

printf(”\nPlease  enter  your  join  condition  :  ”); 
gets(join_condition ); 
if  (strcmp(join_condition,”?”)==0)  { 
for(i=0;i<m;i++)  { 

printfC\nTable  %s  ”,  stab[i].t_name); 
p_att(stab[i].t_name); 

}  f*  end  for  loop  */ 
if  (strcmp(join_condition ”)==0)  { 
return; 

} 

}  /*  end  if  need  help  for  join  */ 

}  /*  end  while  */ 

}  /*  end  if  more  than  1  table  select  */ 

/*  Select  attribute  */ 
for  (i=0;i<  100;i++)  { 
buffli]  =  ’\0’; 

} 

i  =  0; 
j-0; 
k  =  0; 
x  =  0; 
z  =  0; 

/*  Select  attribute  for  one  table  at  a  time  */ 
for  (y=0;y<m;y++)  { 

printf(”\nTable  %s  ”,  stab[y].t_name); 

strcpy(buff,”?”); 

while  (strcmp(buff,”?”)==0)  { 

printf(”\nSelect  the  attribute(s)  separate  by  comma  <,>  :  ”); 
gets(buff); 

if  (strcmp(buff,”?”)==0)  { 
p_att(stab[y].t_name); 

} /*endifbuff==”?”  V 
if  (strempfbuff,”  ”)==0)  { 

/*  exit  if  user  put  space  only  to  the  buffer  */ 
return; 

} 

}  /*  end  while  need  help  */ 
while  (i  <  100)  { 
for  (j=0;j<13y++) 

{ 

if  (bufflk)==44)  { 
j=55; 
k=k+l; 
i-i+1; 

x=x+l; 

} 

else  { 

if  (bufflk]==0)  { 
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strcpy(satt[x].t_name,  stably  ].t_name); 

n=x+l; 

j=55; 

i=1000; 

printf(”%d”,n); 

} 

satt[x].a_name[j]=bufTlk]; 

k=k+l; 

}  /*  end  else  */ 

strcpy(satt[x].t_name,  stably]. t_name); 

}  /*  end  for  j  <  13  */ 

} 

x=x+l; 

k=0; 

for  (i=0;i<100;i++)  { 
buffli]  =  \0’; 

) 

i=0; 

}  /*  End  select  attribute  for  each  table  go  to  the  next  table  */ 
for  (i=0;i<n;i++)  { 

piintf(”\n%s.%s”,  satt[i].t_name,satt[i].a_name); 
getatttype(satt[i  ].t_name,satt[i  ].a_name,satt[i].data_type); 

} 

printf(”\n”); 

cond=0; 

printf(AnAny  condition  ?  (y/n)  ”); 

Ans=yes_noanswer( ); 
if  ((Ans==  1 2 1  )||(Ans==89)) 

{ 

cond=l; 

processconditionO; 

} 

processqueryO; 

ql_retrieve(); 

ql_printdata(); 

}  /*  End  procedure  */ 

/******************«*****************«*******************************♦******/ 

/*  Main  program  for  MDBMS  */ 

*******************************************♦******************************/ 

main() 

{ 

int  wrong_descrp  =  TRUE, 
int  i=0j=0; 
char  Ans,  a; 
char  function  =  0; 
char  choice  = 

printf(”\nConnect  to  database  ”); 
printf(Anwait . ”); 

l 

IlsqConnect  (Asq^-O.^virgo-rndb”,  (char  *)0);  /*  this  code  use  for  connect  to  the  database  */ 

} 

if  (sq!ca.sqlcode  !=  0)  f*  error  in  connection  to  database  */ 

{ 

printf(”\n Sorry,  but  we  cannot  connect  to  the  database  at  this  time!\n\ 

It  could  be  that  you  are  execute  the  program  in  the  wrong  system  An\ 
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Please  write  down  your  code  and  give  them  to  the  administrator:\n\ 
sqlca.sqlcode  =  %kfin”,  sqlca-sqlcode); 
exit(l); 

} 

load_data();  /*  load  catalog  from  the  file  into  memory  */ 

/*  #  line  3504  ”db.sc”  V  /*  destroy  V 

{  /*  Drop  table  result  in  database  */ 

Ilsqlnit((char  *)0); 

II  writedb(  "destroy  result”); 

IIsqSync(0,(char  *)0); 

} 

clr_scr(); 

while  (choice  !=  ’O’) 

{ 

choice  =  user_choice();  /*  print  the  choice  for  user  select  on  screen  */ 

switch(choice)  /*  User  select  case  */ 

{ 

case  T  :  /*  create  table  */ 

clr_scr(); 
create_table(); 
display_info(); 
ql_creale_table(); 

store_data();  /*  save  data  back  in  the  file  V 
break; 

case  ’2’  :  /*  insert  tuple  */ 

clr_scr(); 
insert_tuple(); 
wrongdescrp  =  TRUE; 
while  (wrong^descrp) 

{ 

display_tuple(); 

wrong_descrp  =  check_media_descrp(); 

} 

if  (!wrong_descrp) 

{ 

printf(”\n\nHit  RETURN  to  Continue!!”); 
while  ((c  =  getcharO)  !=  ,\n') 

}; 

store_data(); 

ql_insert_tuple(); 

break: 

case  ’3’ :  /*  retrieve  */ 

clr_scr(): 
retrieveO; 
break; 

case  ’4’ :  /*  deletion  */ 

clr_scr{); 

printf(”Your  selection  %c  is:  ”,  choice); 

printf(”Delete  \n”); 

while  ((c  =  getcharO)  !=  V) 

;  /*  Not  return  do  nothing  */ 
break; 

case  ’5’ :  /*  update  or  modify  */ 

clr_scr(); 


126 


printf(”Your  selection  %c  is:  ”,  choice); 

printf(”Modify  V  ); 

while  ((c  =  getchaK))  !-  ’\n’) 

;  /*  Not  return  do  nothing  \ 
break; 

case  ’6’  :  /*  Test  purpose  now  */  /****/ 

clr_scr<);  /****/ 

print_out_data();  /****/ 

break;  /****/ 

case  ’0’ : 

clr_scr(); 

printf(”Thank  you  for  using  MDBMS  \n”); 
while  ((c  =  getchaK))  !=  Vi’) 

;  /*  Not  return  Jo  nothing  */ 
break; 

}  /*  End  of  switch  */ 

}  /*  End  of  while  choice  !=  ’0’  */ 

/*  #  line  1 895  "dbpei.sc”  */  /*  disconnect  V 

{ 

IIsqExit(&sqlca); 

} 

/*  #  line  1 896  "dbpei.sc”  */  /*  host  code  */ 

}  /*  End  of  main()  */ 
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